namespace = christ
namespace = bang
namespace = mother
namespace = cuck
namespace = pingg

# Catholic clergywomen can all be whores
character_event = {
	id = christ.001
	is_triggered_only = yes
	hide_window = yes
	only_women = yes
	
	trigger = {
		is_adult = yes
		NOT = {
			has_character_flag = ai_whore
		}
	}
	
	immediate = {
		if = {
			limit = {
				is_theocracy = yes
				priestess_whore_religion = yes
				NOT = {
					trait = chaste
					trait = celibate
					trait = ugly
					trait = gluttonous
					age = 45
				}
			}
			set_character_flag = ai_whore # Catholic clergywomen can normally be whores
		}
	}
}

# Catholic women generals can gangbang their troops
character_event = {
	id = christ.005
	is_triggered_only = yes
	desc = christ.005.desc
	picture = GFX_event_eros_plague_03
	border = GFX_event_normal_frame_war

	option = {
		name = christ.005.option
		add_character_modifier = {
			name = troops_gangbanged_general
			duration = -1		}
        
        hidden_tooltip = {
			# Another general in the gangbang, if available
			any_realm_character = {
				limit = {
					is_female = no
					is_adult = yes
					in_command = yes
					ai = yes
					NOT = {
						trait = chaste
						trait = celibate
						trait = incapable
					}
				}
				character_event = { id = WoL.97 }
			}        
			# If she's still not pregnant, one of her (non-character) soldiers
			# has a good chance to do it.
			if = {
				limit = {
				    is_pregnant = no
				    NOT = { age = 45 }
				}
				random = {
					chance = 50
					impregnate = 0
				}
			}
			
			if = {
				limit = { trait = weak }
				random = {
					chance = 10
					add_trait = ill
				}
			}
			if = {
				limit = { is_married = yes }
				add_character_modifier = { name = adulteress duration = -1 }
			}
			set_variable = { which = lust_increase value = 2 }
			character_event = { id = christ.15 }
        }
	}
}

# clear troop gangbang flag, may gangbang again
character_event = {
	id = christ.006
	is_triggered_only = yes
	hide_window = yes
	immediate = {
	clr_character_flag = christ_gangbanged_troops
	}
}

character_event = {
	id = christ.905
	is_triggered_only = yes
	desc = christ.905.desc
	picture = GFX_event_woman_01
	border = GFX_event_normal_frame_war
	immediate = { 
		ROOT = { save_event_target_as = cuckold } 
		random_friend = {
				limit = {
					is_female = no
					is_adult = yes
					is_married = yes
				}
				save_event_target_as = "friend01"
				random_spouse = {
					limit = {
							is_female = yes
							is_adult = yes
					}
					save_event_target_as = "hoe01"
				}

		}        
		random_friend = {
				limit = {
					is_female = no
					is_adult = yes
					NOT = { character = event_target:friend01 } 
				}
				save_event_target_as = "friend02"
		}        
		random_spouse = {
				limit = {
					is_female = yes
					is_adult = yes
				}
				save_event_target_as = "queen_cuck"
				character_event = { id = cuck.908 }
		}        
		random_child = {
				limit = {
					is_female = yes
					is_marriage_adult = yes
					age < 20
				}
				save_event_target_as = "daughter_cuck"
				character_event = { id = christ.908 }
		}        
		random_playable_ruler = {
				limit = {
					religion = catholic
					is_female = yes
					is_adult = yes
					OR = {
						is_married = yes
						is_betrothed = yes
					}
					NOT = {
						spouse = { character = ROOT }
    						is_lover = ROOT
					}
				}
				save_event_target_as = "catholic_cuck"
		}     
		random_realm_character = {
				limit = {
					is_priest = yes
					is_female = yes
					is_adult = yes
					OR = {
						is_married = yes
						is_betrothed = yes
					}
					NOT = {
						spouse = { character = ROOT }
					}
				}
				save_event_target_as = "hoe02"
		}     
		random_realm_lord = {
				limit = {
					is_female = yes
					is_adult = no
					NOT = {
						spouse = { character = ROOT }
					}
				}
				save_event_target_as = "hoe03"
		}     
		random_realm_character = {
				limit = {
					is_landed = no
					is_lowborn = yes
					is_female = yes
					is_adult = yes
					has_children = yes
					is_married = yes
					NOT = {
						spouse = { character = ROOT }
					}
				}
				save_event_target_as = "hoe04"
		}     
		random_realm_character = {
				limit = {
					age < 18
					is_landed = no
					is_lowborn = no
					is_female = yes
					is_adult = yes
					NOT = {
						spouse = { character = ROOT }
					}
				}
				save_event_target_as = "hoe05"
		}     
		any_lover = {
				limit = {
					is_female = yes
					is_adult = yes
				}
				character_event = { id = christ.907 }
		}        
		any_consort = {
				limit = {
					is_female = yes
					is_adult = yes
				}
				character_event = { id = christ.907 }
		}        
		any_spouse = {
				limit = {
					is_female = yes
					is_adult = yes
				}
				character_event = { id = christ.907 }
		}        
		any_close_relative = {
				limit = {
					is_female = yes
					is_adult = yes

				}
				character_event = { id = christ.907 }
		}        
		any_courtier_or_vassal = {
				limit = {
					is_female = yes
					is_adult = yes
				}
				character_event = { id = christ.907 }
		}  
	}
	option = {
		name = christ.905.optionA
		ai_chance = { 
			factor = 30
		}  
		character_event = { id = cuck.909 }   
	}
	option = {
		name = christ.905.optionB
		ai_chance = { 
			factor = 30
		}  
		character_event = { id = christ.912 }   
	}
	option = {
		name = christ.905.optionC
		ai_chance = { 
			factor = 30
		}  
		character_event = { id = christ.927 } 
	} 
 	option = {
		name = christ.905.optionD
		ai_chance = { 
			factor = 10
		}  
		character_event = { id = christ.931 } 
	}
}

# clear troop gangbang flag, may gangbang again
character_event = {
	id = christ.906
	is_triggered_only = yes
	hide_window = yes
	immediate = {
	clr_character_flag = christ_palace_orgied
	}
}

character_event = {
	id = christ.907
	is_triggered_only = yes
	hide_window = yes
	immediate = { ROOT = {
		random_lover = {
				limit = {
					is_female = no
					NOT = {
						trait = chaste
						trait = celibate
  						spouse = { character = ROOT }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT } 
		}
		random_liege = {
				limit = {
					is_female = no
					NOT = {
						trait = chaste
						trait = celibate
 						spouse = { character = ROOT }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT }	
		}            
		random_playable_ruler = {
				limit = {
					is_female = no
					is_adult = yes
					OR = { culture_group = arabic  culture = persian  culture = ethiopian  culture = somali  culture = nubian  culture = daju  culture = kanuri  culture = hausa  culture = zaghawa  culture = soninke  culture = songhay  culture = ashkenazi  culture = sephardi  culture = bengali  culture = nepali  culture = tamil  culture = telugu  culture = kannada  culture = han  culture = manden  culture = nahuatl }
					NOT = {
						trait = chaste
						trait = celibate
  						spouse = { character = ROOT }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT } 
		}     
		random_neighbor_independent_ruler = {
				limit = {
					is_female = no
					is_adult = yes
					OR = { culture_group = arabic  culture = persian  culture = ethiopian  culture = somali  culture = nubian  culture = daju  culture = kanuri  culture = hausa  culture = zaghawa  culture = soninke  culture = songhay  culture = ashkenazi  culture = sephardi  culture = bengali  culture = nepali  culture = tamil  culture = telugu  culture = kannada  culture = han  culture = manden  culture = nahuatl }
					NOT = {
						trait = chaste
						trait = celibate
  						spouse = { character = event_target:cuckold }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT }
		}               
		random_rival = {
				limit = {
					is_female = no
					NOT = {
						trait = chaste
						trait = celibate
  						spouse = { character = ROOT }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT }	
		}        
		random_friend = {
				limit = {
					is_female = no
					NOT = {
						trait = chaste
						trait = celibate
 						spouse = { character = ROOT }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT }	
		}    
		random_host_courtier = {
				limit = {
					is_female = no
					is_adult = yes
					NOT = {
						trait = chaste
						trait = celibate
 						spouse = { character = ROOT }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT }	
		}            
		random_close_relative = {
				limit = {
					is_female = no
					NOT = {
						trait = chaste
						trait = celibate
 						spouse = { character = ROOT }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT }	
		}        
	} 
	} 
}

character_event = {
	id = cuck.908
	is_triggered_only = yes
	hide_window = yes
	immediate = {
		event_target:friend01 = { random = { chance = 50 impregnate = ROOT add_lover = ROOT add_consort = ROOT add_friend = ROOT } } 
		event_target:friend02 = { random = { chance = 50 impregnate = ROOT add_lover = ROOT add_consort = ROOT add_friend = ROOT } } 
		random_liege = {
				limit = {
					is_female = no
					is_adult = yes
					NOT = {
						trait = chaste
						trait = celibate
  						spouse = { character = ROOT }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT } 
		}     
		random_vassal = {
				limit = {
					is_female = no
					is_adult = yes
					NOT = {
						trait = chaste
						trait = celibate
  						spouse = { character = ROOT }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT } 
		}   
		random_realm_lord = {
				limit = {
					is_female = no
					is_adult = yes
					NOT = {
						trait = chaste
						trait = celibate
  						spouse = { character = ROOT }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT } 
		}     
	}          
}  

character_event = {
	id = christ.908
	is_triggered_only = yes
	hide_window = yes
	immediate = { ROOT = {
		random_lover = {
				limit = {
					is_female = no
					is_adult = yes
					OR = { culture_group = arabic  culture = persian  culture = ethiopian  culture = somali  culture = nubian  culture = daju  culture = kanuri  culture = hausa  culture = zaghawa  culture = soninke  culture = songhay  culture = ashkenazi  culture = sephardi  culture = bengali  culture = nepali  culture = tamil  culture = telugu  culture = kannada  culture = han  culture = manden  culture = nahuatl }
					NOT = {
						trait = chaste
						trait = celibate
 						spouse = { character = ROOT }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT }	
		}            
		random_friend = {
				limit = {
					is_female = no
					is_adult = yes
					OR = { culture_group = arabic  culture = persian  culture = ethiopian  culture = somali  culture = nubian  culture = daju  culture = kanuri  culture = hausa  culture = zaghawa  culture = soninke  culture = songhay  culture = ashkenazi  culture = sephardi  culture = bengali  culture = nepali  culture = tamil  culture = telugu  culture = kannada  culture = han  culture = manden  culture = nahuatl }
					NOT = {
						trait = chaste
						trait = celibate
 						spouse = { character = ROOT }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT }	
		}            
		random_realm_lord = {
				limit = {
					is_female = no
					is_adult = yes
					OR = { culture_group = arabic  culture = persian  culture = ethiopian  culture = somali  culture = nubian  culture = daju  culture = kanuri  culture = hausa  culture = zaghawa  culture = soninke  culture = songhay  culture = ashkenazi  culture = sephardi  culture = bengali  culture = nepali  culture = tamil  culture = telugu  culture = kannada  culture = han  culture = manden  culture = nahuatl }
					NOT = {
						trait = chaste
						trait = celibate
  						spouse = { character = ROOT }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT } 
		}     
		random_neighbor_independent_ruler = {
				limit = {
					is_female = no
					is_adult = yes
					OR = { culture_group = arabic  culture = persian  culture = ethiopian  culture = somali  culture = nubian  culture = daju  culture = kanuri  culture = hausa  culture = zaghawa  culture = soninke  culture = songhay  culture = ashkenazi  culture = sephardi  culture = bengali  culture = nepali  culture = tamil  culture = telugu  culture = kannada  culture = han  culture = manden  culture = nahuatl }
					NOT = {
						trait = chaste
						trait = celibate
  						spouse = { character = event_target:cuckold }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT }
		}               
		random_host_courtier = {
				limit = {
					is_female = no
					is_adult = yes
					OR = { culture_group = arabic  culture = persian  culture = ethiopian  culture = somali  culture = nubian  culture = daju  culture = kanuri  culture = hausa  culture = zaghawa  culture = soninke  culture = songhay  culture = ashkenazi  culture = sephardi  culture = bengali  culture = nepali  culture = tamil  culture = telugu  culture = kannada  culture = han  culture = manden  culture = nahuatl }
					NOT = {
						trait = chaste
						trait = celibate
 						spouse = { character = ROOT }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT }	
		}            
		random_close_relative = {
				limit = {
					is_female = no
					is_adult = yes
					OR = { culture_group = arabic  culture = persian  culture = ethiopian  culture = somali  culture = nubian  culture = daju  culture = kanuri  culture = hausa  culture = zaghawa  culture = soninke  culture = songhay  culture = ashkenazi  culture = sephardi  culture = bengali  culture = nepali  culture = tamil  culture = telugu  culture = kannada  culture = han  culture = manden  culture = nahuatl }
					NOT = {
						trait = chaste
						trait = celibate
 						spouse = { character = ROOT }
					}
				}
				random = { chance = 50 impregnate = ROOT add_lover = ROOT }	
		}        
	} 
	} 
}

character_event = {
	id = cuck.909
	desc = cuck.909.desc
	picture = GFX_event_zet_44
	is_triggered_only = yes
	option = { 
		name = cuck.909.optionA
		character_event = { id = cuck.910 } 
	}
}
character_event = {
	id = cuck.910
	desc = cuck.910.desc
	picture = GFX_event_zet_45
	is_triggered_only = yes
	option = { 
		name = cuck.910.optionA
		character_event = { id = cuck.911 } 
	}
}
character_event = {
	id = cuck.911
	desc = cuck.911.desc
	picture = GFX_event_zet_46
	is_triggered_only = yes
	option = { 
		name = cuck.911.optionA
		character_event = { id = cuck.912 } 
	}
}
character_event = {
	id = cuck.912
	desc = cuck.912.desc
	picture = GFX_event_zet_47
	is_triggered_only = yes
	option = { 
		name = cuck.912.optionA
		character_event = { id = cuck.913 } 
	}
}
character_event = {
	id = cuck.913
	desc = cuck.913.desc
	picture = GFX_event_zet_48
	is_triggered_only = yes
	option = { 
		name = cuck.913.optionA
		character_event = { id = cuck.914 } 
	}
}
character_event = {
	id = cuck.914
	desc = cuck.914.desc
	picture = GFX_event_zet_49
	is_triggered_only = yes
	option = { 
		name = cuck.914.optionA
		character_event = { id = cuck.915 } 
	}
}
character_event = {
	id = cuck.915
	desc = cuck.915.desc
	picture = GFX_event_zet_50
	is_triggered_only = yes
	option = { 
		name = cuck.915.optionA
		character_event = { id = cuck.916 } 
	}
}
character_event = {
	id = cuck.916
	desc = cuck.916.desc
	picture = GFX_event_zet_51
	is_triggered_only = yes
	option = { 
		name = cuck.916.optionA
		character_event = { id = cuck.917 } 
	}
}
character_event = {
	id = cuck.917
	desc = cuck.917.desc
	picture = GFX_event_zet_52
	is_triggered_only = yes
	option = { 
		name = cuck.917.optionA
	}
}


character_event = {
	id = christ.912
	desc = christ.912.desc
	picture = GFX_event_zet_12
	is_triggered_only = yes
	option = { 
		name = christ.912.optionA
		character_event = { id = christ.913 } 
	}
}
character_event = {
	id = christ.913
	desc = christ.913.desc
	picture = GFX_event_zet_13
	is_triggered_only = yes
	option = { 
		name = christ.913.optionA
		character_event = { id = christ.914 } 
	}
}
character_event = {
	id = christ.914
	desc = christ.914.desc
	picture = GFX_event_zet_14
	is_triggered_only = yes
	option = { 
		name = christ.914.optionA
		character_event = { id = christ.915 } 
	}
}
character_event = {
	id = christ.915
	desc = christ.915.desc
	picture = GFX_event_zet_15
	is_triggered_only = yes
	option = { 
		name = christ.915.optionA
		character_event = { id = christ.916 } 
	}
}
character_event = {
	id = christ.916
	desc = christ.916.desc
	picture = GFX_event_zet_17
	is_triggered_only = yes
	option = { 
		name = christ.916.optionA
		character_event = { id = christ.917 } 
	}
}
character_event = {
	id = christ.917
	desc = christ.917.desc
	picture = GFX_event_zet_16
	is_triggered_only = yes
	option = { 
		name = christ.917.optionA
		character_event = { id = christ.918 } 
	}
}
character_event = {
	id = christ.918
	desc = christ.918.desc
	picture = GFX_event_zet_18
	is_triggered_only = yes
	option = { 
		name = christ.918.optionA
		character_event = { id = christ.919 } 
	}
}
character_event = {
	id = christ.919
	desc = christ.919.desc
	picture = GFX_event_zet_19
	is_triggered_only = yes
	option = { 
		name = christ.919.optionA
		character_event = { id = christ.920 } 
	}
}
character_event = {
	id = christ.920
	desc = christ.920.desc
	picture = GFX_event_zet_20
	is_triggered_only = yes
	option = { 
		name = christ.920.optionA
		character_event = { id = christ.921 } 
	}
}
character_event = {
	id = christ.921
	desc = christ.921.desc
	picture = GFX_event_zet_21
	is_triggered_only = yes
	option = { 
		name = christ.921.optionA
		character_event = { id = christ.922 } 
	}
}
character_event = {
	id = christ.922
	desc = christ.922.desc
	picture = GFX_event_zet_22
	is_triggered_only = yes
	option = { 
		name = christ.922.optionA
		character_event = { id = christ.923 } 
	}
}
character_event = {
	id = christ.923
	desc = christ.923.desc
	picture = GFX_event_zet_23
	is_triggered_only = yes
	option = { 
		name = christ.923.optionA
		character_event = { id = christ.924 } 
	}
}
character_event = {
	id = christ.924
	desc = christ.924.desc
	picture = GFX_event_zet_24
	is_triggered_only = yes
	option = { 
		name = christ.924.optionA
		character_event = { id = christ.925 } 
	}
}
character_event = {
	id = christ.925
	desc = christ.925.desc
	picture = GFX_event_zet_25
	is_triggered_only = yes
	option = { 
		name = christ.925.optionA
		character_event = { id = christ.926 } 
	}
}
character_event = {
	id = christ.926
	desc = christ.926.desc
	picture = GFX_event_zet_26
	is_triggered_only = yes
	option = { 
		name = christ.926.optionA
	}
}


character_event = {
	id = christ.927
	desc = christ.927.desc
	picture = GFX_event_woman_06
	is_triggered_only = yes
	immediate = { 
		event_target:catholic_cuck = {
			random_spouse = { 
				limit = {
					is_female = no
					is_adult = yes
				}
				save_event_target_as = "husband_cuck"
				add_friend = event_target:cuckold
			}   
			add_lover = event_target:cuckold     
		}        
	}        
	option = { 
		name = christ.927.optionA
		character_event = { id = christ.928 } 
	}
}
character_event = {
	id = christ.928
	desc = christ.928.desc
	picture = GFX_event_orgy_00
	is_triggered_only = yes
	option = { 
		name = christ.928.optionA
		character_event = { id = christ.929 } 
	}
}
character_event = {
	id = christ.929
	desc = christ.929.desc
	picture = GFX_event_orgy_01
	is_triggered_only = yes
	option = { 
		name = christ.929.optionA
		character_event = { id = christ.930 } 
		impregnate = event_target:catholic_cuck
	}
}
character_event = {
	id = christ.930
	desc = christ.930.desc
	picture = GFX_event_woman_06_b
	is_triggered_only = yes
	option = { 
		name = christ.930.optionA
	}
}

character_event = {
	id = christ.931
	desc = christ.931.desc
	picture = GFX_event_zet_29
	is_triggered_only = yes
	immediate = { 
		event_target:hoe01 = {
			add_lover = event_target:cuckold     
		}        
		event_target:hoe02 = {
			add_lover = event_target:cuckold     
		}        
		event_target:hoe03 = {
			add_lover = event_target:cuckold     
		}        
		event_target:hoe04 = {
			add_lover = event_target:cuckold     
		}        
		event_target:hoe05 = {
			add_lover = event_target:cuckold     
		}        
	}        

	option = { 
		name = christ.931.optionA
		character_event = { id = christ.932 } 
	}
}
character_event = {
	id = christ.932
	desc = christ.932.desc
	picture = GFX_event_zet_60
	is_triggered_only = yes
	option = { 
		name = christ.932.optionA
		character_event = { id = christ.933 } 
	}
}
character_event = {
	id = christ.933
	desc = christ.933.desc
	picture = GFX_event_zet_56
	is_triggered_only = yes
	option = { 
		name = christ.933.optionA
		character_event = { id = christ.934 } 
	}
}
character_event = {
	id = christ.934
	desc = christ.934.desc
	picture = GFX_event_zet_57
	is_triggered_only = yes
	option = { 
		name = christ.934.optionA
	}
}









# This is a variation on nada.053 for when the whore is a close relative. It's a bit
# awkward to have it in a different file, but I don't want to risk a future nadamod
# upgrade using, for example, nada.054
character_event = { 
	id = christ.002 
	desc = christ.002.desc 
	picture = GFX_event_woman_36
	is_triggered_only = yes 
	option = { #bang
		name = bang053optiono1 
		ai_chance = { 
			factor = 100 
		}  
		piety = 100 
		prestige = 25 
		event_target:nada_whore = { 
			piety = 100 
			prestige = 25 
			character_event = { id = pingg.007 }
		} 
	} 
} 
character_event = {
	id = bang.101
	desc = bang.101.desc
	picture = GFX_event_incest_rape_01
	is_triggered_only = yes
	option = { 
		name = bang.101.opta
		character_event = { id = bang.102 }   
	}
}
character_event = {
	id = bang.102
	desc = bang.102.desc
	picture = GFX_event_anal_01
	is_triggered_only = yes
	option = { 
		name = bang.102.opta
		character_event = { id = bang.103 }   
	}
}
character_event = {
	id = bang.103
	desc = bang.103.desc
	picture = GFX_event_anal_02
	is_triggered_only = yes
	option = { 
		name = bang.103.opta
	}
}
character_event = {
	id = bang.104
	desc = bang.104.desc
	picture = GFX_event_cuck_gangbang_01
	is_triggered_only = yes
	option = { 
		name = bang.104.opta
	}
}
character_event = {
	id = mother.001
	desc = mother.001.desc
	picture = GFX_event_woman_37
	is_triggered_only = yes
	option = { 
		name = mother001option01
		event_target:nada_whore = { character_event = { id = pingg.008 } }  
	}
}
character_event = { 
	id = mother.002 
	desc = mother.002.desc 
	picture = GFX_event_woman_38 
	is_triggered_only = yes 
	option = { 
		name = mother001option02 
		event_target:nada_whore = { character_event = { id = pingg.009 } }  
	} 
} 
character_event = { 
	id = mother.003 
	desc = mother.003.desc 
	picture = GFX_event_woman_39
	is_triggered_only = yes 
	option = { 
		name = mother001option03 
		add_trait = lustful 
		add_trait = hedonist 
		add_trait = nymphomaniac 
		add_trait = kind 
		hidden_tooltip = { event_target:nada_whore = { 
			add_trait = hedonist 
			add_trait = lustful 
			add_trait = nymphomaniac 
			add_trait = seductress 
			add_trait = kind 
			piety = 100 
			prestige = 25 
			character_event = { id = WoL.98 } 
		} } 
	} 
} 
character_event = { 
	id = bang.002 
	desc = bang.002.desc 
	picture = GFX_event_woman_06_b 
	is_triggered_only = yes 
	option = { #bang
		name = bang053optiono4 
		ai_chance = { 
			factor = 100 
		} 
		add_trait = hedonist 
		piety = 25 
		prestige = 100 
		hidden_tooltip = { event_target:nada_whore = { 
			add_trait = hedonist 
			add_trait = lustful 
			add_trait = nymphomaniac 
			add_trait = trusting 
			wealth = 50
			piety = 25 
			prestige = 100 
			character_event = { id = WoL.98 } 
		} } 
	} 
} 
character_event = { 
	id = bang.001 
	desc = bang.001.desc 
	picture = GFX_event_woman_32 
	is_triggered_only = yes 
	option = { #bang 
		name = bang053optiono2 
		ai_chance = { 
			factor = 85 
			modifier = { 
				factor = 2 
				trait = fertile 
			} 
			modifier = { 
				factor = 0.5 
				trait = kind 
			} 
			modifier = { 
				factor = 0.5 
				trait = humble 
			} 
			modifier = { 
				factor = 0.0 
				trait = chaste 
			} 
			modifier = { 
				factor = 0.0 
				trait = cuck 
			} 
		} 
		wealth = -10 
		piety = 5 
		event_target:nada_whore = { 
			wealth = 10 
			piety = 5 
			character_event = { id = WoL.98 } 
		} 
	} 
	option = { #cuck 
		name = bang053optiono3 
		ai_chance = { 
			factor = 10
			modifier = {
				factor = 5.0
				trait = kind
			}
			modifier = {
				factor = 5.0
				trait = humble
			}
			modifier = {
				factor = 10.0
				trait = craven
			}
			modifier = {
				factor = 20.0
				trait = cuck
			}
		}
		wealth = -30
		piety = 300
		prestige = -100
		event_target:nada_whore = { hidden_tooltip = { 
		random_playable_ruler = {
				limit = {
					is_female = no
					is_adult = yes
					OR = { culture_group = arabic  culture = persian  culture = ethiopian  culture = somali  culture = nubian  culture = daju  culture = kanuri  culture = hausa  culture = zaghawa  culture = soninke  culture = songhay  culture = ashkenazi  culture = sephardi  culture = bengali  culture = nepali  culture = tamil  culture = telugu  culture = kannada  culture = manden  culture = nahuatl }
					NOT = {
						trait = chaste
						trait = celibate
  						spouse = { character = event_target:nada_whore }
					}
				}
				save_event_target_as = "bull01"
				random = { chance = 50 impregnate = event_target:nada_whore add_lover = event_target:nada_whore add_consort = event_target:nada_whore } 
		}     
		random_playable_ruler = {
				limit = {
					is_female = no
					is_adult = yes
					OR = { culture_group = arabic  culture = persian  culture = ethiopian  culture = somali  culture = nubian  culture = daju  culture = kanuri  culture = hausa  culture = zaghawa  culture = soninke  culture = songhay  culture = ashkenazi  culture = sephardi  culture = bengali  culture = nepali  culture = tamil  culture = telugu  culture = kannada  culture = manden  culture = nahuatl }
					NOT = {
						character = event_target:bull01
						trait = chaste
						trait = celibate
  						spouse = { character = event_target:nada_whore }
					}
				}
				save_event_target_as = "bull02"
				random = { chance = 50 impregnate = event_target:nada_whore add_lover = event_target:nada_whore add_consort = event_target:nada_whore } 
		}     
		random_playable_ruler = {
				limit = {
					is_female = no
					is_adult = yes
					OR = { culture_group = arabic  culture = persian  culture = ethiopian  culture = somali  culture = nubian  culture = daju  culture = kanuri  culture = hausa  culture = zaghawa  culture = soninke  culture = songhay  culture = ashkenazi  culture = sephardi  culture = bengali  culture = nepali  culture = tamil  culture = telugu  culture = kannada  culture = manden  culture = nahuatl }
					NOT = {
						character = event_target:bull01
						character = event_target:bull02
						trait = chaste
						trait = celibate
  						spouse = { character = event_target:nada_whore }
					}
				}
				save_event_target_as = "bull03"
				random = { chance = 50 impregnate = event_target:nada_whore add_lover = event_target:nada_whore add_consort = event_target:nada_whore } 
		}     
			wealth = 30
			piety = 100
			prestige = 300
			character_event = { id = pingg.004 } 
		} } 
	}
	option = { #cancel
		name = nada020option0
		ai_chance = {
			factor = 5
		}
	}
}
character_event = {
	id = cuck.001
	desc = cuck.001.desc
	picture = GFX_event_cuck_gangbang_04
	is_triggered_only = yes
	option = { 
		name = cuck001option01
		event_target:nada_whore = { character_event = { id = pingg.005 } }  
	}
}
character_event = {
	id = cuck.002
	desc = cuck.002.desc
	picture = GFX_event_cuck_gangbang_20
	is_triggered_only = yes
	option = { 
		name = cuck001option02
		event_target:nada_whore = { character_event = { id = pingg.006 } }  
	}
}
character_event = { 
	id = cuck.003 
	desc = cuck.003.desc 
	picture = GFX_event_zet_01
	is_triggered_only = yes 
	option = { 
		name = cuck001option03 
		hidden_tooltip = { add_trait = cuck 
		add_trait = kind 
		add_trait = lustful 
		add_trait = hedonist 
		give_nickname = nick_the_cuck
		event_target:nada_whore = { 
			add_trait = wife_of_cuck
			add_trait = gangbang_fanatic
			add_trait = seductress
			give_nickname = nick_the_dominatrix
		} } 
	} 
} 
character_event = {
	id = cuck.010
	is_triggered_only = yes
	hide_window = yes
	only_women = yes
	ai = yes
	
	trigger = {
	    is_adult = yes
	}

	immediate = {
		if = {
			top_liege = {
				limit = {
					is_female = no
					is_adult = yes
					NOT = {
						trait = chaste
						trait = celibate
  						spouse = { character = ROOT }
					}
				}
				impregnate = ROOT
				add_lover = ROOT
				add_consort = ROOT
				save_event_target_as = "liege01"
				character_event = { id = cuck.015 days = 1 } 
			}     
		    add_trait = wife_of_cuck
		    add_trait = cheap_whore
		    add_artifact = queen_of_spades
		    add_artifact = dress
		    add_artifact = stockings
		    save_event_target_as = "wife01"
		    random_spouse = { limit = { has_trait = cuck } character_event = { id = cuck.011 days = 1 } save_event_target_as = "cuck01" add_favor = event_target:liege01 } 
		}
	}
}

character_event = {
	id = cuck.011
	desc = cuck.011.desc
	picture = GFX_event_zet_33
	is_triggered_only = yes
	option = { 
		name = cuck011option01
		character_event = { id = cuck.012 }  
	}
}
character_event = {
	id = cuck.012
	desc = cuck.012.desc
	picture = GFX_event_zet_34
	is_triggered_only = yes
	option = { 
		name = cuck012option01
		character_event = { id = cuck.013 }  
	}
}
character_event = {
	id = cuck.013
	desc = cuck.013.desc
	picture = GFX_event_zet_35
	is_triggered_only = yes
	option = { 
		name = cuck013option01
		character_event = { id = cuck.014 }  
	}
}
character_event = {
	id = cuck.014
	desc = cuck.014.desc
	picture = GFX_event_zet_36
	is_triggered_only = yes
	option = { 
		name = cuck014option01
	}
}


character_event = {
	id = cuck.015
	desc = cuck.015.desc
	picture = GFX_event_zet_37
	is_triggered_only = yes
	option = { 
		name = cuck015option01
		character_event = { id = cuck.016 }  
	}
}
character_event = {
	id = cuck.016
	desc = cuck.016.desc
	picture = GFX_event_zet_38
	is_triggered_only = yes
	option = { 
		name = cuck016option01
		character_event = { id = cuck.017 }  
	}
}
character_event = {
	id = cuck.017
	desc = cuck.017.desc
	picture = GFX_event_zet_39
	is_triggered_only = yes
	option = { 
		name = cuck017option01
		character_event = { id = cuck.018 }  
	}
}
character_event = {
	id = cuck.018
	desc = cuck.018.desc
	picture = GFX_event_zet_40
	is_triggered_only = yes
	option = { 
		name = cuck018option01
		character_event = { id = cuck.019 }  
	}
}
character_event = {
	id = cuck.019
	desc = cuck.019.desc
	picture = GFX_event_zet_41
	is_triggered_only = yes
	option = { 
		name = cuck019option01
	}
}



character_event = {
	id = pingg.001
	hide_window = yes
	is_triggered_only = yes
	
	immediate = {
		FROM = { character_event = { id = bang.001 } }
	}
	option = { name = nada021option1 } 
}
character_event = {
	id = pingg.004
	hide_window = yes
	is_triggered_only = yes
	
	immediate = {
		FROM = { character_event = { id = cuck.001 } }
	}
	option = { name = nada021option1 } 
}
character_event = {
	id = pingg.005
	hide_window = yes
	is_triggered_only = yes
	
	immediate = {
		FROM = { character_event = { id = cuck.002 } }
	}
	option = { name = nada021option1 } 
}
character_event = {
	id = pingg.006
	hide_window = yes
	is_triggered_only = yes
	
	immediate = {
		FROM = { character_event = { id = cuck.003 } }
	}
	option = { name = nada021option1 } 
}
character_event = {
	id = pingg.002
	hide_window = yes
	is_triggered_only = yes
	
	immediate = {
		FROM = { character_event = { id = bang.002 } }
	}
	option = { name = nada021option1 } 
}
character_event = {
	id = pingg.003
	hide_window = yes
	is_triggered_only = yes
	
	immediate = {
		FROM = { character_event = { id = christ.002 } }
	}
	option = { name = nada021option1 } 
}
character_event = {
	id = pingg.007
	hide_window = yes
	is_triggered_only = yes
	
	immediate = {
		FROM = { character_event = { id = mother.001 } }
	}
	option = { name = nada021option1 } 
}
character_event = {
	id = pingg.008
	hide_window = yes
	is_triggered_only = yes
	
	immediate = {
		FROM = { character_event = { id = mother.002 } }
	}
	option = { name = nada021option1 } 
}
character_event = {
	id = pingg.009
	hide_window = yes
	is_triggered_only = yes
	
	immediate = {
		FROM = { character_event = { id = mother.003 } }
	}
	option = { name = nada021option1 } 
}

# Female court chaplain offers to gangbang guests
character_event = {
    id = christ.004
    desc = christ.004.desc
    picture = GFX_evt_feast
    
    only_rulers = yes
	capable_only = yes
	prisoner = no
	
	is_triggered_only = yes

	trigger = {
		war = no
		has_character_modifier = holding_large_feast
		NOT = {
			has_character_flag = feast_gangbang
		}
		any_courtier = {
			has_job_title = job_spiritual
			is_female = yes
		}
	}

    option = {
		name = christ.004.opta
		ai_chance = {
			factor = 5

			modifier = {
				factor = 0.1
				NOT = {
					treasury = 30
				}
			}
			modifier = {
				factor = 20
				treasury = 30
			}
		}
		set_character_flag = feast_gangbang
		treasury = -10
	}
    option = {
		name = christ.004.optb
		ai_chance = {
			factor = 5

			modifier = {
				factor = 20
				NOT = {
					treasury = 30
				}
			}
			modifier = {
				factor = 0.1
				treasury = 30
			}
		}
		prestige = -10
	}
}

# court chaplain gangbangs the guests
character_event = {
	id = christ.007
	desc = christ.007.desc
	picture = GFX_event_nada3

	only_rulers = yes
	prisoner = no
	capable_only = yes

	is_triggered_only = yes

	trigger = {
		war = no
		has_character_flag = host_feast_started
		has_character_modifier = holding_large_feast
		has_character_flag = feast_gangbang
		any_vassal = {
			war = no
			has_character_flag = guest_feast_started
		}
	}
	
	option = {
		name = christ.007.opta
		if = {
			limit = {
				NOT = {
					trait = gregarious
				}
				NOT = {
					num_of_traits = 5
				}
			}
			random = {
				chance = 25

				add_trait = gregarious
			}
		}
		if = {
			limit = {
				NOT = {
					trait = lustful
				}
				NOT = {
					num_of_traits = 5
				}
			}
			random = {
				chance = 25

				add_trait = lustful
			}
		}
		prestige = 10
		
		# We need to set an event target for our court chaplain
        any_courtier = {
        	limit = {
				has_job_title = job_spiritual
				is_female = yes
			}
			save_event_target_as = gangbang_chaplain
		}
        # All the sex events will be in the chaplain's scope
        event_target:gangbang_chaplain = {
            any_vassal = {
                limit = {
                    prisoner = no
                    NOT = { trait = incapable }
                    NOT = { trait = chaste }
                    NOT = { trait = celibate }
                    NOT = { has_character_modifier = holding_large_feast }
                    war = no
                    is_marriage_adult = yes
                    is_female = no
                }
                character_event = { id = WoL.97 }
            }
            if = {
				limit = { trait = weak }
				random = {
					chance = 10
					add_trait = ill
				}
			}
			if = {
				limit = { NOT = { trait = strong } }
				random = {
					chance = 5
					add_trait = ill
				}
			}
			if = {
				limit = { is_married = yes }
				add_character_modifier = { name = adulteress duration = -1 }
			}
			character_event = { id = christ.15 }
        }
	}
}

# Christianity Mod enabled flag
character_event = {
	id = christ.010
	
	hide_window = yes
	
	is_triggered_only = yes
	
	trigger = {
		not = {
			has_global_flag = christ_enabled
		}
	}
	immediate = {
		set_global_flag = christ_enabled 
	}
}

# Set up global variables for religion's lustfullness
character_event = {
    id = christ.11
    
    hide_window = yes
    is_triggered_only = yes
    
    trigger = {
        NOT = { has_global_flag = christ_religion_globals_created }
    }
    
    immediate = {
        # The variables have to start at 1 instead of 0 because variables with a
        # value of 0 won't be saved.
        set_variable = { which = global_catholic_lust value = 1 }
        set_variable = { which = global_cathar_lust value = 1 }
        set_variable = { which = global_fraticelli_lust value = 1 }
        set_variable = { which = global_waldensian_lust value = 1 }
        set_variable = { which = global_lollard_lust value = 1 }
        set_variable = { which = global_orthodox_lust value = 1 }
        set_variable = { which = global_miaphysite_lust value = 1 }
        set_variable = { which = global_monophysite_lust value = 1 }
        set_variable = { which = global_bogomilist_lust value = 1 }
        set_variable = { which = global_monothelite_lust value = 1 }
        set_variable = { which = global_iconoclast_lust value = 1 }
        set_variable = { which = global_paulician_lust value = 1 }
        set_variable = { which = global_nestorian_lust value = 1 }
        set_variable = { which = global_messalian_lust value = 1 }
        set_variable = { which = global_sunni_lust value = 1 }
        set_variable = { which = global_zikri_lust value = 1 }
        set_variable = { which = global_yazidi_lust value = 1 }
        set_variable = { which = global_ibadi_lust value = 1 }
        set_variable = { which = global_kharijite_lust value = 1 }
        set_variable = { which = global_shiite_lust value = 1 }
        set_variable = { which = global_druze_lust value = 1 }
        set_variable = { which = global_hurufi_lust value = 1 }
        set_variable = { which = global_pagan_lust value = 1 }
        set_variable = { which = global_norse_pagan_reformed_lust value = 1 }
        set_variable = { which = global_norse_pagan_lust value = 1 }
        set_variable = { which = global_tengri_pagan_reformed_lust value = 1 }
        set_variable = { which = global_tengri_pagan_lust value = 1 }
        set_variable = { which = global_baltic_pagan_reformed_lust value = 1 }
        set_variable = { which = global_baltic_pagan_lust value = 1 }
        set_variable = { which = global_finnish_pagan_reformed_lust value = 1 }
        set_variable = { which = global_finnish_pagan_lust value = 1 }
        set_variable = { which = global_aztec_reformed_lust value = 1 }
        set_variable = { which = global_aztec_lust value = 1 }
        set_variable = { which = global_slavic_pagan_reformed_lust value = 1 }
        set_variable = { which = global_slavic_pagan_lust value = 1 }
        set_variable = { which = global_west_african_pagan_reformed_lust value = 1 }
        set_variable = { which = global_west_african_pagan_lust value = 1 }
        set_variable = { which = global_zun_pagan_reformed_lust value = 1 }
        set_variable = { which = global_zun_pagan_lust value = 1 }
        set_variable = { which = global_hellenic_pagan_lust value = 1 }
        set_variable = { which = global_zoroastrian_lust value = 1 }
        set_variable = { which = global_mazdaki_lust value = 1 }
        set_variable = { which = global_manichean_lust value = 1 }
        set_variable = { which = global_jewish_lust value = 1 }
        set_variable = { which = global_samaritan_lust value = 1 }
        set_variable = { which = global_karaite_lust value = 1 }
        set_variable = { which = global_hindu_lust value = 1 }
        set_variable = { which = global_buddhist_lust value = 1 }
        set_variable = { which = global_jain_lust value = 1 }
        set_global_flag = christ_religion_globals_created
    }
}

# Calculate a character's influence multiplier based on the size of their realm.
# Characters with no titles are not important enough to influence their
# religion's lustfulness. This is called as a yearly (and on startup) on_action.
character_event = {
    id = christ.12
    
    hide_window = yes
    is_triggered_only = yes
    
    immediate = {
        set_variable = { which = christ_influence_multiplier value = 0 }
        # Basic influence is realm size divided by ten. The division is to keep
        # the numbers from being too large and unwieldy.
        export_to_variable = {
            which = christ_influence_multiplier value = realm_size
        }
        divide_variable = { which = christ_influence_multiplier value = 10 }
        # The head of a religion naturally has a large influence on the relgion
        # even with little territory.
        if = {
            limit = { controls_religion = yes }
            change_variable = {
                which = christ_influence_multiplier value = 100
            }
        }
    }
}

# This event applies increases to the global lust variable for a character's
# religion. The base value (to be modified by the character's influence
# multiplier) can be passed as a variable "lust_increase". If the variable isn't
# set to at least 1 it defaults to 1, and it gets reset to 0 at the end of the
# event.
character_event = {
    id = christ.15
    
    hide_window = yes
    is_triggered_only = yes
    
    immediate = {
        if = {
            limit = {
                is_variable_equal = { which = lust_increase value = 0 }
            }
            set_variable = { which = lust_increase value = 1 }
        }
        
        # Figure out how much to change the global lust based on the character's
        # influence multiplier.
        multiply_variable = {
            which = lust_increase which = christ_influence_multiplier
        }
        trigger_switch = {
            on_trigger = religion
            catholic = { change_variable = { which = global_catholic_lust which = lust_increase } }
            cathar = { change_variable = { which = global_cathar_lust which = lust_increase } }
            fraticelli = { change_variable = { which = global_fraticelli_lust which = lust_increase } }
            waldensian = { change_variable = { which = global_waldensian_lust which = lust_increase } }
            lollard = { change_variable = { which = global_lollard_lust which = lust_increase } }
            orthodox = { change_variable = { which = global_orthodox_lust which = lust_increase } }
            miaphysite = { change_variable = { which = global_miaphysite_lust which = lust_increase } }
            monophysite = { change_variable = { which = global_monophysite_lust which = lust_increase } }
            bogomilist = { change_variable = { which = global_bogomilist_lust which = lust_increase } }
            monothelite = { change_variable = { which = global_monothelite_lust which = lust_increase } }
            iconoclast = { change_variable = { which = global_iconoclast_lust which = lust_increase } }
            paulician = { change_variable = { which = global_paulician_lust which = lust_increase } }
            nestorian = { change_variable = { which = global_nestorian_lust which = lust_increase } }
            messalian = { change_variable = { which = global_messalian_lust which = lust_increase } }
            sunni = { change_variable = { which = global_sunni_lust which = lust_increase } }
            zikri = { change_variable = { which = global_zikri_lust which = lust_increase } }
            yazidi = { change_variable = { which = global_yazidi_lust which = lust_increase } }
            ibadi = { change_variable = { which = global_ibadi_lust which = lust_increase } }
            kharijite = { change_variable = { which = global_kharijite_lust which = lust_increase } }
            shiite = { change_variable = { which = global_shiite_lust which = lust_increase } }
            druze = { change_variable = { which = global_druze_lust which = lust_increase } }
            hurufi = { change_variable = { which = global_hurufi_lust which = lust_increase } }
            pagan = { change_variable = { which = global_pagan_lust which = lust_increase } }
            norse_pagan_reformed = { change_variable = { which = global_norse_pagan_reformed_lust which = lust_increase } }
            norse_pagan = { change_variable = { which = global_norse_pagan_lust which = lust_increase } }
            tengri_pagan_reformed = { change_variable = { which = global_tengri_pagan_reformed_lust which = lust_increase } }
            tengri_pagan = { change_variable = { which = global_tengri_pagan_lust which = lust_increase } }
            baltic_pagan_reformed = { change_variable = { which = global_baltic_pagan_reformed_lust which = lust_increase } }
            baltic_pagan = { change_variable = { which = global_baltic_pagan_lust which = lust_increase } }
            finnish_pagan_reformed = { change_variable = { which = global_finnish_pagan_reformed_lust which = lust_increase } }
            finnish_pagan = { change_variable = { which = global_finnish_pagan_lust which = lust_increase } }
            aztec_reformed = { change_variable = { which = global_aztec_reformed_lust which = lust_increase } }
            aztec = { change_variable = { which = global_aztec_lust which = lust_increase } }
            slavic_pagan_reformed = { change_variable = { which = global_slavic_pagan_reformed_lust which = lust_increase } }
            slavic_pagan = { change_variable = { which = global_slavic_pagan_lust which = lust_increase } }
            west_african_pagan_reformed = { change_variable = { which = global_west_african_pagan_reformed_lust which = lust_increase } }
            west_african_pagan = { change_variable = { which = global_west_african_pagan_lust which = lust_increase } }
            zun_pagan_reformed = { change_variable = { which = global_zun_pagan_reformed_lust which = lust_increase } }
            zun_pagan = { change_variable = { which = global_zun_pagan_lust which = lust_increase } }
            hellenic_pagan = { change_variable = { which = global_hellenic_pagan_lust which = lust_increase } }
            zoroastrian = { change_variable = { which = global_zoroastrian_lust which = lust_increase } }
            mazdaki = { change_variable = { which = global_mazdaki_lust which = lust_increase } }
            manichean = { change_variable = { which = global_manichean_lust which = lust_increase } }
            jewish = { change_variable = { which = global_jewish_lust which = lust_increase } }
            samaritan = { change_variable = { which = global_samaritan_lust which = lust_increase } }
            karaite = { change_variable = { which = global_karaite_lust which = lust_increase } }
            hindu = { change_variable = { which = global_hindu_lust which = lust_increase } }
            buddhist = { change_variable = { which = global_buddhist_lust which = lust_increase } }
            jain = { change_variable = { which = global_jain_lust which = lust_increase } }
        }
        
        set_variable = { which = lust_increase value = 0 }
    }
}

# Exhibitionist level up chance, based on WoL.96
character_event = {
	id = christ.96
	
	hide_window = yes
	is_triggered_only = yes
	
	immediate = {
		
		# Chance of trait adjustments
		if = {
			limit = {
				NOT = { trait = chaste }
				NOT = { trait = lustful }
				random = 85 # 15% chance
			}
			add_trait = lustful
			character_event = { id = 38272 } # Lustful notification
		}
		
		if = {
			limit = {
				trait = chaste
				random = 50
			}
			remove_trait = chaste
			character_event = { id = 38303 } # Chaste loss notification
		}
				
		# Chance of levelling up Exhibitionist skills
		if = {
			limit = {
				has_character_modifier = christ_exhibitionist_2
			}
			random = {
				chance = 50
				character_event = { id = christ.99 days = 4 } # Gain the Master Exhibitionist trait
			}
			break = yes
		}
		if = {
			limit = {
				has_character_modifier = christ_exhibitionist_1
			}
			random = {
				chance = 75
				remove_character_modifier = christ_exhibitionist_1
				add_character_modifier = {
					modifier = christ_exhibitionist_2
					duration = -1
				}
			}
			break = yes
		}
		
		if = {
			limit = {
				NOR = {
					trait = exhibitionist
				}
			}
			random = {
				chance = 90
				add_character_modifier = {
					modifier = christ_exhibitionist_1
					duration = -1
				}
			}
		}
	}
}

# Exhibitionist trait gained! Based on WoL.99
character_event = {
	id = christ.99
	desc = EVTDESC_christ_99
	
	picture = GFX_evt_lovers
	border = GFX_event_normal_frame_intrigue
	
	is_triggered_only = yes
	
	trigger = {
		NOT = { lifestyle_traits = 1 }
		NOT = { has_character_flag = christ_no_to_exhibitionist_trait }

	}
		
	option = {
		name = EVTOPTA_christ_99
		trigger = {
			is_female = yes
			NOT = { religion_group = muslim }
			NOT = { religion_group = zoroastrian_group }
			NOT = { religion_group = indian_group }
		}
		ai_chance = {
			factor = 100
		}
		remove_character_modifier = christ_exhibitionist_2
		add_trait = exhibitionist
		hidden_tooltip = { character_event = { id = christ.15 } }
	}
	
	option = {
		name = EVTOPTA_christ_99_PERS
		trigger = {
			is_female = yes
			OR = {
				religion_group = muslim
				religion_group = zoroastrian_group
				religion_group = indian_group
			}
		}
		ai_chance = {
			factor = 100
		}
		remove_character_modifier = christ_exhibitionist_2
		add_trait = exhibitionist
		hidden_tooltip = { character_event = { id = christ.15 } }
	}
	
	option = {
		name = EVTOPTB_christ_99
		trigger = {
			is_female = no
		}
		ai_chance = {
			factor = 100
		}
		remove_character_modifier = christ_exhibitionist_2
		add_trait = exhibitionist
		hidden_tooltip = { character_event = { id = christ.15 } }
	}
	
	option = {
		name = EVTOPTC_christ_99
		ai_chance = {
			factor = 0
		}
		set_character_flag = christ_no_to_exhibitionist_trait
	}
}

# Man who got servant pregnant during exhibitionist sex gets child
character_event = {
	id = christ.335
	desc = christ.335.desc
	picture = GFX_evt_pregnancy
	border = GFX_event_normal_frame_intrigue
	
	is_triggered_only = yes
	
	only_men = yes
	
	option = {
		name = {
			text = christ.335.opta
			trigger = { lustful_religion = no }
		}
		name = {
			text = christ.335.opta.catholic
			trigger = { lustful_religion = yes }
		}
		
		if = {
			limit = { lustful_religion = no }
			piety = -10
		}
		if = {
			limit = { lustful_religion = yes }
			prestige = -5
		}

		create_character = {
			age = 0
			trait = bastard
		}
		new_character = {
			set_father = ROOT
			dynasty = father
		}	
	}
}

# Give teenagers curves based on their mother
character_event = {
    id = christ.030
    is_triggered_only = yes
	hide_window = yes
	only_women = yes
	min_age = 12
	max_age = 16
	
	trigger = {
		NOT = { has_character_flag = christ_teen_curves }
	}
	
	immediate = {
        if = {
	        limit = { NOT = { has_character_flag = christ_breast_size_set } }
	        character_event = { id = christ.32 }
	    }

	    # Due to the limits of the engine, we have to shuffle some values around
	    # using a temp variable so that we can call christ.31 with the smaller
	    # teen breast size without losing the regular breast_size.
	    set_variable = { which = temp_size which = breast_size }
	    subtract_variable = { which = breast_size value = 1 }
	    character_event = { id = christ.31 }
	    set_variable = { which = breast_size which = temp_size }
        
        # Teens whose mothers have bombshell have a chance to get it too. Their
        # own breast_size has to be large enough to support it. They still have
        # the normal chance to inherit it when they reach adulthood.
		if = {
			limit = {
				mother = { trait = bombshell }
				check_variable = { which = breast_size value = 4 }
			}
			random = {
				chance = 50
				add_trait = fair
				add_trait = bombshell
			}
		}
		
		if = {
			limit = {
				NOT = { trait = fair }
				trait = bombshell
				}
			random_list = { # char has to to be attractive (trait fair) to get even more attractive (trait bombshell)
				50 = { remove_trait = bombshell } #either gain attractiveness or lose bombshell
				50 = { add_trait = fair }
			}
		}
		set_character_flag = christ_teen_curves
	}
}

# Assign breast traits based on breast_size value
character_event = {
    id = christ.31 
    is_triggered_only = yes
    hide_window = yes
    only_women = yes
        
    immediate = {
        if = {
            limit = { check_variable = { which = breast_size value = 7 } }
            add_trait = gigantic_tits
            break = yes
        }
        if = {
            limit = { check_variable = { which = breast_size value = 6 } }
            add_trait = enormous_tits
            break = yes
        }
        if = {
            limit = { check_variable = { which = breast_size value = 5 } }
            add_trait = huge_tits
            break = yes
        }
        if = {
            limit = { check_variable = { which = breast_size value = 4 } }
            add_trait = big_tits
            break = yes
        }
        if = {
            limit = { check_variable = { which = breast_size value = 3 } }
            add_trait = regular_tits
            break = yes
        }
        if = {
            limit = { check_variable = { which = breast_size value = 2 } }
            add_trait = small_tits
            break = yes
        }
        if = {
            limit = { check_variable = { which = breast_size value = 1 } }
            add_trait = tiny_tits
            break = yes
        }
        # It shouldn't be possible to get here, but just in case the event gets
        # called on a character with no breast_size set, we'll default to size
        # 3 and assign the trait..
        set_variable = { which = breast_size value = 3 }
        add_trait = regular_tits
    }
}

# Determine breast size for a character based on mother's breast size. This will
# be run at birth. Note that it will run for male characters too, so that I can
# add support for inheriting breasts based on both sides of the family.
character_event = {
    id = christ.32
    is_triggered_only = yes
    hide_window = yes
    
    immediate = {
		# First we give ROOT the default values: +3 from the mother, and another +3 from father/real father.
        # THEN if nother or father had actual values different from 3, we correct the ROOT value
		# first we check if the mother has her breasts assigned, else ROOT gets the default 3
		ROOT = {
			set_variable = { which = breast_size value = 6 }
		}
		if = {
			limit = {
				mother_even_if_dead = { has_character_flag = christ_breast_size_set }
			}
			mother_even_if_dead = {
				ROOT = {
					change_variable = { which = breast_size which = PREV }
					change_variable = { which = breast_size value = -3 }
				}
			}
		}		
        # Now get the father's breast size variable. This allows men to pass
        # along genes for breast size too. We'll need to use a temporary
        # variable here to work around the engine's limitations.
		# BUT: bastards should not pick the father but the real_father instead. We use a trigger_switch for that.
		if = {
			limit = {
				OR = {
					father_even_if_dead = { has_character_flag = christ_breast_size_set }
					real_father_even_if_dead = { has_character_flag = christ_breast_size_set }
				}
			}	
			trigger_switch = {
				on_trigger = is_father_real_father
				yes = {
					father_even_if_dead = {
						ROOT = {
							change_variable = { which = breast_size which = PREV }
							change_variable = { which = breast_size value = -3 }
						}
					}
				}
				no = {
					real_father_even_if_dead = {
						ROOT = {
							change_variable = { which = breast_size which = PREV }
							change_variable = { which = breast_size value = -3 }
						}
					}
				}
			}
		}	
        # Now average the inherited sizes
        divide_variable = { which = breast_size value = 2 }
        random_list = {
            10 = { subtract_variable = { which = breast_size value = 2 } }
            25 = { subtract_variable = { which = breast_size value = 1 } }
            35 = {} # No change in breast size
            20 = { change_variable = { which = breast_size value = 1 } }
            15 = { change_variable = { which = breast_size value = 2 } }
            5 = { change_variable = { which = breast_size value = 3 } }
        }
        # If the size is less than 1, just set it to 1 as that's the smallest
        # possible size.
        if = {
            limit = { NOT = { check_variable = { which = breast_size value = 1 } } }
            set_variable = { which = breast_size value = 1 }
        }
        # Realms were women live on cum have a boost to breast size
        if = {
            limit = { top_liege = { has_character_modifier = cumdrinking_women } }
            change_variable = { which = breast_size value = 1 }
        }
        # Set any breast size over the largest trait size to that maximum value.
        # This way breast sizes won't quickly grow to extreme values giving
        # everyone the largest size.
        if = {
            limit = { check_variable = { which = breast_size value = 7 } }
            set_variable = { which = breast_size value = 7 }
        }
        set_character_flag = christ_breast_size_set
    }
}

# Male: Seduce beautiful guard. Can appear at court (chance of Syphilitic, Cruel, Pregnancy).
# This is the counterpart for WoL.520 for rulers who can have female bodyguards.
character_event = {
	id = christ.520
	
	desc = christ.520.desc
	picture = GFX_evt_lovers
	border = GFX_event_normal_frame_intrigue
	
	only_playable = yes
	only_capable = yes
	prisoner = no
	
	trigger = {
	    gender_equality_trigger = yes
		has_focus = focus_seduction
		is_ill = no
		has_regent = no
		OR = {
			is_female = no
			NOT = { age = 65 }
		}
		OR = {
			AND = {
				is_female = no
				NOT = { trait = homosexual }
			}
			AND = {
				is_female = yes
				trait = homosexual
			}
		}
		NOT = { has_character_modifier = hidden_seduced_bodyguard }
	}
	
	mean_time_to_happen = {
		months = 60
		modifier = {
			factor = 4.0
			trait = chaste
		}
		modifier = {
			factor = 4.0
			OR = {
				trait = ugly
				trait = dwarf
				trait = inbred
				trait = imbecile
				trait = clubfooted
				trait = harelip
				trait = hunchback
				trait = gluttonous
				trait = eunuch
			}
		}
		modifier = {
			factor = 2.0
			trait = just
		}
	}
	
	option = {
		name = christ.520.opta # Tumble and make lover (appears at court)
		
		ai_chance = {
			factor = 5
		}
		
		add_character_modifier = {
			modifier = hidden_seduced_bodyguard
			years = 300
			hidden = yes
		}
		
		create_character = {
			dynasty = none
			religion = ROOT
			culture = ROOT
			female = yes
			age = 17
			trait = tough_soldier
			trait = strong
			trait = fair
			trait = diligent
			trait = trusting
			trait = brave
		}
		
		hidden_tooltip = {
			new_character = {
				add_lover = ROOT
				if = {
					limit = { same_sex = ROOT }
					add_trait = homosexual
				}
				opinion = {
					who = ROOT
					modifier = opinion_seduced_lustful_worship
					years = 300
				}
				# The bodyguard is a good fighter, so she needs to have breasts
				# small enough that they won't interfere with her combat ability
				random_list = {
				    10 = { set_variable = { which = breast_size value = 1 } }
				    10 = { set_variable = { which = breast_size value = 2 } }
				}
				set_character_flag = christ_breast_size_set
				character_event = { id = nada.030 }
			    character_event = { id = WoL.98 } # Chance of impregnation
				random = {
					chance = 25
					character_event = { id = 6359 days = 15 random = 5 } #Gives lover's pox
				}
			}
		}		
	}
	
	option = {
		name = christ.520.optb # Tumble and make bodyguard (grants a nice character modifier)
		
		ai_chance = {
			factor = 100
		}
		
		add_character_modifier = {
			modifier = seduced_loyal_bodyguard
			years = 300
		}
		
		add_character_modifier = {
			modifier = hidden_seduced_bodyguard
			years = 30
			hidden = yes
		}
		
		hidden_tooltip = {
			random = {
				chance = 25
				character_event = { id = WoL.40 days = 7 } # Chance of VD
			}
		}
	}
	
	option = {
		name = EVTOPTC_WOL_520 # No
		
		ai_chance = {
			factor = 1
		}
		if = {
		    limit = { lustful_religion = yes }
		    piety = -5
		}
		if = {
		    limit = { lustful_religion = no }
            piety = 5
		}
	}
}

# Female ruler sees stable girl with stallion
character_event = {
    id = christ.4000
    desc = christ.4000.desc
    picture = GFX_event_horse_cumdrinking_02
	border = GFX_event_normal_frame_war

	is_triggered_only = yes
	
	ai = no
	only_women = yes
	only_capable = yes
	prisoner = no

    trigger = {
        NOT = { has_character_modifier = cumdrinking_troops }
    }
    
    # Ruler gets an idea
    option = {
        name = christ.4000.opta
        character_event = { id = christ.4001 days = 10 }
    }
    # Ruler joins in
    option = {
        name = christ.4000.optb
        trigger = {
            OR = {
                trait = lustful
                trait = hedonist
            }
        }
        piety = 100
        health = 0.5
        character_event = { id = christ.4001 days = 10 }
    }
    # Ruler chastises stable girl
    option = {
        name = christ.4000.optc
        piety = -5
    }
}

# Ruler makes a suggestion to her marshal
character_event = {
    id = christ.4001
    desc = {
        trigger = {
            job_marshal = { is_female = yes }
        }
        text = christ.4001.desca
    }
    desc = {
        trigger = {
            job_marshal = { NOT = { is_female = yes } }
        }
        text = christ.4001.descb
    }
    picture = GFX_event_horse_cumdrinking_06
	border = GFX_event_normal_frame_war
	
	is_triggered_only = yes
	
	ai = no
	only_women = yes
	only_capable = yes
	prisoner = no

    trigger = {
        NOT = { has_character_modifier = cumdrinking_troops }
    }
    
    # Pay for the training
    option = {
        name = christ.4001.opta
        scaled_wealth = { value = -2.0 min = -300 }
        character_event = { id = christ.4002 days = 60 }
    }
    # Don't pay
    option = {
        name = christ.4001.optb
    }
}

# Ruler observes completed training
character_event = {
    id = christ.4002
    desc = christ.4002.desc
    picture = GFX_event_horse_cumdrinking_01
	border = GFX_event_normal_frame_war

	is_triggered_only = yes
	
	ai = no
	only_women = yes
	only_capable = yes
	prisoner = no

    trigger = {
        NOT = { has_character_modifier = cumdrinking_troops }
    }
    
    option = {
        name = christ.4002.opta
		add_character_modifier = {
			name = cumdrinking_troops
			duration = -1
			inherit = yes
		}
		# This event is rare and has a widespread effect on lust, so it gives a
		# bigger than usual increase.
		hidden_tooltip = { set_variable = { which = lust_increase value = 10 } }
		hidden_tooltip = { character_event = { id = christ.15 } }
    }
}

# Cumdrinking spreads to all women
narrative_event = {
    id = christ.4003
    title = christ.4003.title
    desc = christ.4003.desc
    picture = GFX_event_horse_cumdrinking_05
    border = GFX_event_narrative_frame_economy
    
    trigger = {
        has_character_modifier = cumdrinking_troops
    }
    
    mean_time_to_happen = {
        years = 60
        modifier = {
            factor = 0.5
            trait = hedonist
        }
        modifier = {
            factor = 2
            OR = {
                trait = chaste
                trait = celibate
            }
        }
        modifier = {
            factor = 0.25
            has_character_modifier = dog_lover
        }
    }
    
    option = {
        name = christ.4003.opta
        set_title_flag = cumdrinking_spreading
        # This event is rare and has a widespread effect on lust, so it gives a
		# bigger than usual increase.
		hidden_tooltip = { set_variable = { which = lust_increase value = 10 } }
		hidden_tooltip = { character_event = { id = christ.15 } }
    }
}

# Steward offers to make women live on nothing but cum
character_event = {
    id = christ.4004
    desc = christ.4004.desc
    picture = GFX_event_horse_cumdrinking_08
    border = GFX_event_normal_frame_economy
    
    prisoner = no
    only_playable = yes
    only_women = yes
    
    trigger = {
        has_title_flag = cumdrinking_spreading
    }
    
    mean_time_to_happen = {
        days = 365
        modifier = {
            factor = 0.5
            trait = hedonist
        }
        modifier = {
            factor = 2
            OR = {
                trait = chaste
                trait = celibate
            }
        }
        modifier = {
            factor = 0.5
            has_character_modifier = dog_lover
        }
    }
    
    option = { # encourage cumdrinking
        name = christ.4004.opta
        add_character_modifier = {
			name = increasing_cum_production
			duration = -1
			inherit = yes
		}
		clr_title_flag = cumdrinking_spreading
		character_event = { id = christ.4005 days = 3650 }
    }
    
    option = { # do nothing
        name = christ.4004.optb
    }
    
    option = { # discourage the practice
        name = christ.4004.optc
		clr_title_flag = cumdrinking_spreading
    }
}

# The work is done
character_event = {
    id = christ.4005
    desc = christ.4005.desc
    picture = GFX_event_horse_orgy_01
    border = GFX_event_normal_frame_economy
    
    is_triggered_only = yes
    
    immediate = {
        add_character_modifier = {
			name = cumdrinking_women
			duration = -1
			inherit = yes
		}
		# This event is far-reaching and has a huge effect on lust
		set_variable = { which = lust_increase value = 100 }
		character_event = { id = christ.15 }
    }
    
    option = {
        name = christ.4005.opta
        trigger = {
            is_female = yes
        }
    }
    option = {
        name = christ.4005.optb
        trigger = {
            NOT = { is_female = yes }
        }
    }
}

# Court physician fertility treatment for women, equivalent to RIP.4013
character_event = {
    id = christ.4013
    desc = christ.4013.desc
    picture = GFX_evt_court_physician
	border = GFX_event_normal_frame_religion
	
	min_age = 12
	capable_only = yes
	only_playable = yes
	prisoner = no
	only_women = yes
	has_dlc = "Reapers"
	is_married = yes
	
	is_triggered_only = yes
	
    trigger = {
        is_pregnant = no
		spouse = {
			NOT = { age = 45 }
			ai = yes
		}
		NOR = { 
			has_character_flag = fertility_treatment
			AND = {
			    lustful_religion = no
			    OR = {
			        trait = monk
                    trait = nun
			    }
			}
			trait = celibate
			trait = eunuch
			num_of_children = 1
			is_merchant_republic = yes
		}
		any_courtier_or_vassal = {
			#is_female = no
			ai = yes
			liege = { character = ROOT }
			has_minor_title = title_court_physician
			OR = {
				has_character_flag = is_court_physician
				trait = physician
			}
		}
	}
	
    weight_multiplier = {
		days = 1
		
		modifier = {
			factor = 2
			age = 40
		}
		modifier = {
			factor = 2
			age = 60
		}
		modifier = {
			factor = 1.5
			any_courtier_or_vassal = {
				liege = { character = ROOT }
				has_minor_title = title_court_physician
				OR = {
					has_character_flag = is_court_physician
					trait = physician
				}
				learning = 16
			}
		}
	}

	immediate = {
		random_courtier_or_vassal = {
			limit = {
				ai = yes
				liege = { character = ROOT }
				has_minor_title = title_court_physician
				OR = {
					has_character_flag = is_court_physician
					trait = physician
				}
			}
			save_event_target_as = physician_target
		}
        save_event_target_as = fertility_target
	}

	option = { # Yes, I need children!
		name = EVTOPTA_RIP_4013
		custom_tooltip = {
			text = fertility_treatment_custom_tooltip
			hidden_tooltip = {
				set_character_flag = fertility_treatment
				event_target:physician_target = {
					character_event = { id = christ.4014 }
				}
			}
		}
	}
	
	option = { # No, I know I can do it without help
		name = EVTOPTB_RIP_4013
		prestige = 5
	}
}

# Fertility treatment outcome tombola
character_event = {
	id = christ.4014
	hide_window = yes
	
	is_triggered_only = yes
	
	immediate = {
		random_list = {
			10 = { # Physician seduces and impregnates you
				modifier = {
					factor = 0
					event_target:physician_target = {
						is_female = yes
					}
				}
				modifier = {
					factor = 0
					event_target:fertility_target = {
						is_lover = FROM
					}
				}
				modifier = {
					factor = 0
					event_target:fertility_target = {
						is_friend = FROM
					}
				}
				modifier = {
					factor = 0
					OR = {
						AND = {
							lustful_religion = no
							OR = {
								trait = monk
								trait = nun							
							}
						}
						trait = celibate
						trait = eunuch
						trait = chaste
					}
				}
				modifier = {
					factor = 0.1
					NOR = {
						trait = deceitful
						trait = lustful
						trait = hedonist
						trait = seducer
					}
				}
				modifier = {
					factor = 5
					AND = {
						OR = { 
							AND = {
								lustful_religion = yes
								OR = {
									trait = monk
									trait = nun							
								}
							}
							trait = deceitful
							trait = lustful
							trait = hedonist
							trait = seducer
						}
						event_target:fertility_target = {
							OR = { 
								trait = deceitful
								trait = lustful
								trait = hedonist
								trait = seductress
							}
						}
					}
				}
				
				FROM = { character_event = { id = christ.4015 } }
			}
			
			10 = { # Physician concocts a herbal mixture that is TOO effective...
				modifier = {
					factor = 0
					has_game_rule = {
						name = supernatural_events
						value = off
					}
				}
				modifier = {
					factor = 0.5
					FROM = { ai = yes }
				}
				modifier = {
					factor = 5
					trait = lunatic
				}
				modifier = {
					factor = 5
					trait = possessed
				}
				
				FROM = {
					set_character_flag = fertility_increased_too_much
					character_event = { id = christ.4016 days = 14 random = 7 }
				}
			}
			
			10 = { # Physician concocts a herbal mixture that causes breast growth
				modifier = {
					factor = 0
					has_game_rule = {
						name = supernatural_events
						value = off
					}
				}
				modifier = {
					factor = 0.5
					FROM = { ai = yes }
				}
				modifier = {
				    factor = 10
				    NOT = { check_variable = { which = breast_size value = 2 } }
				}
				modifier = {
				    factor = 5
					check_variable = { which = breast_size value = 2 }
				    NOT = { check_variable = { which = breast_size value = 3 } }
				}
				FROM = {
				    set_character_flag = gigantomastia
				    character_event = { id = christ.4021 days = 30 random = 7 }
				}
			}
			
			50 = { # Physician concocts a herbal mixture that increases your fertility
				modifier = {
					factor = 2
					learning = 14
				}
				modifier = {
					factor = 2
					learning = 18
				}
				
				FROM = {
					set_character_flag = fertility_increased
					character_event = { id = christ.4016 days = 14 random = 7 }
				}
			}
			
			30 = { # Physician concocts a herbal mixture that DECREASES your fertility
				modifier = {
					factor = 0.1
					learning = 12
				}
				modifier = {
					factor = 2
					NOT = { learning = 10 }
				}
				modifier = {
					factor = 2
					NOT = { learning = 8 }
				}
				modifier = {
					factor = 2
					has_character_flag = physician_is_quack
				}
				
				FROM = {
					set_character_flag = fertility_decreased
					character_event = { id = christ.4016 days = 14 random = 7 }
				}
			}
		}
	}
}

# Character seduced and impregnated
character_event = {
	id = christ.4015
	desc = christ.4015.desc
	picture = GFX_evt_court_physician
	border = GFX_event_normal_frame_religion
	
	is_triggered_only = yes
	
	trigger = {
		event_target:physician_target = {
			is_alive = yes
		}
		event_target:fertility_target = {
			is_alive = yes
		}
	}
	
	option = { # Go along
		name = christ.4015.opta
		tooltip_info = paranoid
		
		event_target:fertility_target = {
			add_lover = event_target:physician_target
			impregnate = event_target:physician_target
		}
	}
	
	option = { # Reject?
		name = christ.4015.optb
	}
}

# You receive the concoction, last chance to back out!
character_event = {
	id = christ.4016
	desc = christ.4016.desc
	picture = GFX_evt_performing_experiments
	border = GFX_event_normal_frame_religion
	
	is_triggered_only = yes
	
	trigger = {
		event_target:physician_target = {
			is_alive = yes
		}
	}
	
	immediate = {

	}

	option = { # Drink it
		name = EVTOPTA_RIP_4016
		
		custom_tooltip = {
			text = drink_the_concoction_custom_tooltip
			hidden_tooltip = {
				if = {
					limit = {
						has_character_flag = fertility_increased_too_much
					}
					character_event = { id = christ.4017 days = 3 random = 5 }
				}
				if = {
					limit = {
						has_character_flag = fertility_increased
					}
					character_event = { id = christ.4018 days = 14 random = 7 }
				}
				if = {
					limit = {
						has_character_flag = fertility_decreased
					}
					character_event = { id = christ.4019 days = 14 random = 7 }
				}
			}
		}
		
	}
	
	option = { # Back out
		name = EVTOPTB_RIP_4016
		
		ai_chance = {
			factor = 0
		}
		
		prestige = -5
		event_target:physician_target = {
			opinion = {
				modifier = opinion_insulted
				who = ROOT
				years = 10
			}
		}
	}
}

# The concoction works TOO well!
character_event = {
	id = christ.4017
	desc = christ.4017.desc
	picture = GFX_evt_performing_experiments
	border = GFX_event_normal_frame_religion
	
	is_triggered_only = yes
	hide_new = yes
	
	trigger = {

	}
	
	immediate = {
		random_realm_character = {
			limit = {
				prisoner = no
				NOT = { character = ROOT }
				NOT = { character = event_target:lover_2 }
				NOT = { character = event_target:lover_3 }
				NOT = { age = 45 }
				is_marriage_adult = yes
				NOT = { trait = incapable }
				has_lover = no
				NOT = {
					spouse = { 
						character = ROOT
					} 
				}
			}
			character_event = { id = WoL.97 }
			save_event_target_as = lover_1
		}
		random_realm_character = {
			limit = {
				prisoner = no
				NOT = { character = ROOT }
				NOT = { character = event_target:lover_1 }
				NOT = { character = event_target:lover_3 }
				NOT = { age = 45 }
				is_marriage_adult = yes
				NOT = { trait = incapable }
				has_lover = no
				NOT = {
					spouse = { 
						character = ROOT
					} 
				}
			}
			character_event = { id = WoL.97 }
			save_event_target_as = lover_2
		}
		random_realm_character = {
			limit = {
				prisoner = no
				NOT = { character = ROOT }
				NOT = { character = event_target:lover_1 }
				NOT = { character = event_target:lover_2 }
				NOT = { character = ROOT }
				NOT = { age = 45 }
				is_marriage_adult = yes
				NOT = { trait = incapable }
				has_lover = no
				NOT = {
					spouse = { 
						character = ROOT
					} 
				}
			}
			character_event = { id = WoL.97 }
			save_event_target_as = lover_3
		}
		random_realm_character = {
			limit = {
				prisoner = no
				is_female = yes
				age = 12
				has_lover = no
				trait = homosexual
				NOT = { character = ROOT }
				NOT = { trait = incapable }
				NOT = { character = event_target:lover_h_2 }
			}
			save_event_target_as = lover_h_1
		}
		random_realm_character = {
			limit = {
				prisoner = no
				is_female = yes
				age = 23
				has_lover = no
				trait = homosexual
				NOT = { character = ROOT }
				NOT = { trait = incapable }
				NOT = { character = event_target:lover_h_1 }
			}
			save_event_target_as = lover_h_2
		}
	}

	option = { # Worked TOO well!
		name = christ.4017.opta
		
		if = {
			limit = {
				trait = chaste
			}
			remove_trait = chaste
		}
		add_trait = lustful
		if = {
			limit = {
				NOT = { trait = homosexual }
			}  
			add_trait = homosexual
		}
		fertility = 0.25
		hidden_tooltip = { set_variable = { which = lust_increase value = 5 } }
		hidden_tooltip = { character_event = { id = christ.15 } }
		
		if = {
		    # Teen characters get permanently altered.
		    limit = { NOT = { age = 16 } }
		    character_event = { id = christ.4020 days = 30 }
		}
		
		any_spouse = {
			limit = {
				prisoner = no
				NOT = { trait = incapable }
			}
			hidden_tooltip = {
				character_event = { id = WoL.97 }
			}
			if = {
				limit = {
					NOT = { is_lover = ROOT }
				}
				add_lover = ROOT
			}
		}
		
		event_target:lover_1 = {
			add_lover = ROOT
		}
		event_target:lover_2 = {
			add_lover = ROOT
		}
		event_target:lover_3 = {
			add_lover = ROOT
		}
		event_target:lover_h_1 = {
			add_lover = ROOT
		}
		event_target:lover_h_2 = {
			add_lover = ROOT
		}
	}
}

# Successful fertility treatment!
character_event = {
	id = christ.4018
	desc = EVTDESC_RIP_4018
	picture = GFX_evt_performing_experiments
	border = GFX_event_normal_frame_religion
	
	is_triggered_only = yes
	
	trigger = {
		event_target:physician_target = {
			is_alive = yes
		}
	}
	
	immediate = {
	    impregnate = event_target:spouse_target
	}

	option = { # Fantastic, I shall reward you!
		name = EVTOPTA_RIP_4018
		
		trigger = {
			trait = charitable
		}
		
		prestige = 15
		
		fertility = 0.1
		
		transfer_scaled_wealth = {
			to = event_target:physician_target
			value = 0.3
		}
		
		event_target:physician_target = {
			opinion = {
				modifier = opinion_was_praised
				who = ROOT
				years = 10
			}
		}
		
	}
	
	option = { # You have done well
		name = EVTOPTB_RIP_4018
		
		prestige = 5
		fertility = 0.1
	}
}

# Botched fertility treatment!
character_event = {
	id = christ.4019
	desc = christ.4019.desc
	picture = GFX_evt_experiments_failed
	border = GFX_event_normal_frame_religion
	
	is_triggered_only = yes
	
	trigger = {
		event_target:physician_target = {
			is_alive = yes
		}
	}
	
	immediate = {
		impregnate = event_target:spouse_target
	}

	option = { # I shall have your head for this!
		name = EVTOPTA_RIP_4019
		
		fertility = -0.05
		
		if = {
			limit = {
				NOR = {
					trait = kind
					trait = wroth
				}
			}
			add_trait = wroth
		}
		
		if = {
			limit = {
				trait = kind
			}
			remove_trait = kind
		}
		
		opinion = {
			who = event_target:physician_target
			modifier = opinion_traitor
		}
		
		event_target:physician_target = {
			imprison = ROOT
		}
		
	}
	
	option = { # Oh well
		name = EVTOPTB_RIP_4019
		
		prestige = -5
		fertility = -0.05
	}
}

# Woman become permanently dependent on constant sex
character_event = {
    id = christ.4020
    desc = christ.4020.desc
	picture = GFX_event_nada3
    
    is_triggered_only = yes
    
    option = {
        name = christ.4020.opta
        add_trait = nymphomaniac
        hidden_tooltip = { set_variable = { which = lust_increase value = 2 } }
		hidden_tooltip = { character_event = { id = christ.15 } }
    }    
}

# Woman experiences rapid breast growth
character_event = {
    id = christ.4021
    desc = christ.4021.desc
    picture = GFX_breast_growth
    
    is_triggered_only = yes
    
    option = {
        name = christ.4021.opta
        hidden_tooltip = {
            if = {
                limit = { age = 16 }
                random_list = {
                    10 = {
                        change_variable = { which = breast_size value = 1 }
                    }
                    10 = {
                        change_variable = { which = breast_size value = 2 }
                    }
                    10 = {
                        change_variable = { which = breast_size value = 3 }
                    }
                    10 = {
                        change_variable = { which = breast_size value = 4 }
                    }
                }
            }
            # Extreme effect for teen characters
            if = {
                limit = { NOT = { age = 16 } }
                    random_list = {
                        10 = {
                            change_variable = { which = breast_size value = 4 }
                        }
                        10 = {
                            change_variable = { which = breast_size value = 5 }
                        }
                        10 = {
                            change_variable = { which = breast_size value = 6 }
                        }
                        10 = {
                            change_variable = { which = breast_size value = 7 }
                        }
                    }
                    character_event = { id = christ.15 }
            }
            
            character_event = { id = christ.31 }
        }
    }
}

#POWER: Swapping Nymphomania
character_event = {
	id = christ.4090
	desc = christ.4090.desc
	picture = GFX_evt_pregnancy
	border = GFX_event_normal_frame_religion

	is_triggered_only = yes

	option = {
		name = EVTOPT_MNM_4090
		add_trait = nymphomaniac
		hidden_tooltip = { character_event = { id = christ.15 } }
	}
}

character_event = {
	id = christ.4091
	desc = christ.4091.desc
	picture = GFX_evt_secluded_in_prayer
	border = GFX_event_normal_frame_religion

	is_triggered_only = yes


	option = {
		name = christ.4091.opt
		remove_trait = nymphomaniac
	}
}

# Eros Plague starts
province_event = {
    id = christ.5000
    hide_window = yes
    
    is_triggered_only = yes
    
    trigger = {
        disease = eros_plague
    }
    
    immediate = {
		save_event_target_as = eros_plague_outbreak_location
		owner = {
			narrative_event = { id = christ.5001 }
			any_liege = {
				limit = {
					NOT = { character = ROOT }
				}
				narrative_event = { id = christ.5001 }
			}
		}
	}
}

# Eros Plague Notification
narrative_event = {
	id = christ.5001
	title = christ.5001.name
	picture = GFX_event_orgy_01
	border = GFX_event_narrative_frame_religion

	desc = {
	    trigger = { lustful_religion = yes }
	    text = christ.5001.lustfuldesc
	}
    desc = {
	    trigger = { lustful_religion = no }
	    text = christ.5001.desc
	}
	
	is_triggered_only = yes
	
	option = {
		name = EVTOPTA_RIP_4001
        hidden_tooltip = {
            character_event = { id = christ.5009 days = 720 random = 20 }
        }
	}
}

# join in?
character_event = {
	id = christ.5002
	desc = christ.5002.desc
	picture = GFX_event_orgy_01
	border = GFX_event_normal_frame_religion

	is_triggered_only = yes
	

	option = {
		name = christ.5002.opta
		
		ai_chance = {
			factor = 1
		}
		
		custom_tooltip = { text = join_in_fucking }
		hidden_tooltip = {
			if = {
				limit = {
					any_courtier_or_vassal = {
						liege = { character = ROOT }
						has_minor_title = title_court_physician
					}
				}
				character_event = { id = christ.5003 days = 5 random = 10 } # Court Physician recommends you rest.
			}
			if = {
				limit = {
					NOT = {
						any_courtier_or_vassal = {
							liege = { character = ROOT }
							has_minor_title = title_court_physician
						}
					}
				}
				if = {
					limit = {
						has_character_flag = got_eros_plague
					}
					character_event = { id = christ.5005 days = 5 random = 10 } # Go out into the streets and get the Eros Plague!
				}
				if = {
					limit = {
						NOT = { has_character_flag = got_eros_plague }
						is_landed = yes
					}
					character_event = { id = christ.5004 days = 5 random = 10 } # Go out into the streets and become Fucking Queen!
				}
			}	
		}
	}
	
	option = {
		name = christ.5002.optb
		
		ai_chance = {
			factor = 0
		}
		
		custom_tooltip = { text = refuse_to_join_in_fucking }
		hidden_tooltip = {
			if = {
				limit = {
					has_character_flag = got_eros_plague
				}
				random_list = {
					50 = { # Nothing happens.
						clr_character_flag = got_eros_plague
						set_character_flag = immune_eros_plague
					}
					50 = { # Can't resist dancing!
						modifier = {
                            factor = 5
                            OR = {
                                trait = seducer
                                trait = seductress
                            }
                        }
                        modifier = {
                            factor = 10
                            trait = nymphomaniac
                        }
                        modifier = {
                            factor = 5
                            trait = hedonist
                        }
                        modifier = {
                            factor = 5
                            AND = {
                                lustful_religion = yes
                                trait = zealous
                            }
                        }
                        modifier = {
                            factor = 2
                            trait = lustful
                        }
						modifier = {
							factor = 0.5
							trait = temperate
						}
						modifier = {
							factor = 0.5
							trait = chaste
						}
                        modifier = {
							factor = 0.1
							trait = celibate
						}						
						character_event = { id = christ.5005 days = 10 random = 10 }
						set_character_flag = forced_to_fuck
					}
				}
			}
		}
	}
}

# Court Physician recommends rest.
character_event = {
	id = christ.5003
	desc = christ.5003.desc
	picture = GFX_evt_poke_king_in_chest
	border = GFX_event_normal_frame_religion

	is_triggered_only = yes
	
	immediate = {
		random_courtier_or_vassal = {
			limit = {
				liege = { character = ROOT }
				has_minor_title = title_court_physician
			}
			save_event_target_as = target_physician
		}
	}

	option = { # Agree
		name = EVTOPTA_RIP_4003
		custom_tooltip = { text = refuse_to_join_in_fucking }
		
		event_target:target_physician = {
			opinion = {
				modifier = opinion_glad
				who = ROOT
				years = 5
			}
		}
		
		hidden_tooltip = {
			if = {
				limit = {
					has_character_flag = got_eros_plague
				}
				random_list = {
					50 = { # Nothing happens.
						clr_character_flag = got_eros_plague
						set_character_flag = immune_eros_plague
					}
					50 = { # No, I must fuck!
					    modifier = {
                            factor = 5
                            OR = {
                                trait = seducer
                                trait = seductress
                            }
                        }
                        modifier = {
                            factor = 10
                            trait = nymphomaniac
                        }
                        modifier = {
                            factor = 5
                            trait = hedonist
                        }
                        modifier = {
                            factor = 5
                            AND = {
                                lustful_religion = yes
                                trait = zealous
                            }
                        }
                        modifier = {
                            factor = 2
                            trait = lustful
                        }
						modifier = {
							factor = 0.5
							trait = temperate
						}
						modifier = {
							factor = 0.5
							trait = chaste
						}
                        modifier = {
							factor = 0.1
							trait = celibate
						}						
						
						character_event = { id = christ.5005 days = 5 random = 10 }
						set_character_flag = forced_to_fuck
					}
				}
			}
		}
	}
	
	option = { # No! I want to dance.
		name = christ.5003.optb
		custom_tooltip = { text = join_in_fucking }
		
		event_target:target_physician = {
			opinion = {
				modifier = opinion_irritated
				who = ROOT
				years = 5
			}
		}
		
		hidden_tooltip = {
			if = {
				limit = {
					has_character_flag = got_eros_plague
				}
				# Go out into the streets and get the Eros Plague!
				character_event = { id = christ.5005 days = 5 random = 10 }
			}
			if = {
				limit = {
					NOT = { has_character_flag = got_eros_plague }
					is_landed = yes
				}
				# Go out into the streets and become Fucking Queen!
				character_event = { id = christ.5004 days = 5 random = 10 }
			}
		}
	}
}

# Become Fucking Queen!
character_event = {
	id = christ.5004
	desc = christ.5004.desc
	picture = GFX_event_nada3
	border = GFX_event_normal_frame_religion
	
	hide_from = yes

	is_triggered_only = yes

	option = {
		name = EVTOPTA_RIP_4004
		
		prestige = 50
		piety = 50
		
		if = {
			limit = { trait = stressed }
			remove_trait = stressed
		}
		if = {
			limit = { trait = depressed }
			remove_trait = depressed
		}
		
		if = {
			limit = {
				is_female = yes
			}
			add_character_modifier = {
				modifier = fucking_queen
				years = 500
			}
		}
		if = {
			limit = {
				is_female = no
			}
			add_character_modifier = {
				modifier = fucking_king
				years = 500
			}
		}
	}
}

# Get Eros Plague!
character_event = {
	id = christ.5005
	picture = GFX_event_eros_plague_04
	border = GFX_event_normal_frame_religion
	
	hide_from = yes

	is_triggered_only = yes
	
	desc = {
		trigger = {
			NOT = { has_character_flag = forced_to_fuck }
		}
		text = christ.5005.desca
	}
	desc = {
		trigger = {
			has_character_flag = forced_to_fuck
		}
		text = christ.5005.descb
	}

	option = {
		name = christ.5005.opta
		
		add_trait = eros_plague
		
		if = {
		    limit = { is_female = yes }
		    impregnate = 0
		}
		
		hidden_tooltip = {
			random_list = {
				45 = { # Recover
					modifier = {
						factor = 1.5
						is_strong_trigger = yes
					}
					modifier = {
						factor = 0.5
						trait = infirm
					}
					character_event = { id = christ.5006 days = 90 random = 20 }
				}
				40 = { # It gets worse...
					modifier = {
						factor = 1.5
						trait = diligent
					}
					modifier = {
						factor = 50
						is_unimportant_trigger = yes
					}
					character_event = { id = christ.5007 days = 10 random = 10 }
				}
				15 = { # Your overdo it!
					modifier = {
						factor = 3
						is_weak_trigger = yes
					}
					character_event = { id = christ.5008 days = 30 random = 10 }
				}
			}
			# This event has such a widespread effect that the value is this low
			# only because people can believe they were forced into it by the
			# plague.
			set_variable = { which = lust_increase value = 10 }
			character_event = { id = christ.15 }
		}
	}
}

# Recover From the Eros Plague
character_event = {
	id = christ.5006
	desc = christ.5006.desc
	picture = GFX_event_eros_plague_02
	border = GFX_event_normal_frame_religion

	is_triggered_only = yes

	option = {
		name = {
		    text = christ.5006.opta
		    trigger = { lustful_religion = no }
		}
		name = {
		    text = christ.5006.opta.lustful
		    trigger = { lustful_religion = yes }
		}
		
		remove_trait = eros_plague
		if = {
			limit = {
				has_character_modifier = cant_stop_fucking
			}
			remove_character_modifier = cant_stop_fucking
		}
		
		clr_character_flag = got_eros_plague
		set_character_flag = immune_eros_plague
		
	}
}

# Eros Plague gets worse...
character_event = {
	id = christ.5007
	picture = GFX_event_eros_plague_01
	border = GFX_event_normal_frame_religion
	
	desc = {
	    trigger = { is_female = yes }
	    text = christ.5007.descfemale
	}
	desc = {
	    trigger = { is_female = no }
	    text = christ.5007.descmale
	}

	is_triggered_only = yes

	option = {
		name = EVTOPTA_RIP_4007
		
		add_character_modifier = {
			modifier = cant_stop_fucking
			duration = -1
		}
		
		hidden_tooltip = {
			character_event = { id = christ.5006 days = 90 random = 20 }
		}
	}
}

# Fuck until you injure yourself.
character_event = {
	id = christ.5008
	desc = christ.5008.desc
	picture = GFX_event_eros_plague_01
	border = GFX_event_normal_frame_religion

	is_triggered_only = yes

	option = {
		name = EVTOPTA_RIP_4008
		
		remove_trait = eros_plague
		if = {
			limit = {
				has_character_modifier = cant_stop_fucking
			}
			remove_character_modifier = cant_stop_fucking
		}
		
		clr_character_flag = got_eros_plague
		set_character_flag = immune_eros_plague
		
		add_trait = mangled
		add_trait = severely_injured
		hidden_tooltip = {
			character_event = { id = RIP.11505 } #Notify mangled
			resolve_severely_injured_effect = yes
		}
	}
}

# What to say after Eros Plague ends
character_event = {
    id = christ.5009
    desc = christ.5009.desc
	picture = GFX_event_eros_plague_02
	border = GFX_event_normal_frame_religion

	is_triggered_only = yes

    option = {  # Forget it
        name = christ.5009.opta
    }

    option = {  # Embrace it
        name = {
            text = christ.5009.optb
            trigger = { lustful_religion = no }
        }
        name = {
            text = christ.5009.optb.lustful
            trigger = { lustful_religion = yes }
        }
        
        hidden_tooltip = {
            # Choosing to embrace the Eros Plague has a huge widespread effect
            set_variable = { which = lust_increase value = 200 }
            character_event = { id = christ.15 }
        }
    }
}

# Woman experiments with dog
character_event = {
	id = christ.5200
	desc = christ.5200.desc
	picture = GFX_event_dog_01
	border = GFX_event_normal_frame_war

	is_triggered_only = yes
	
	only_playable = yes
	only_capable = yes
	only_women = yes
	prisoner = no
	
	trigger = {
		has_character_modifier = pet_hunting_dog
		has_character_flag = good_dog
		OR = {
			trait = lustful
			trait = hedonist
		}
	}
	
	option = {
		name = christ.5200.opta
		character_event = { id = christ.5201 days = 30 }
	}
	option = {
		name = christ.5200.optb
		prestige = 5
	}
}

# Woman gives dog blowjob
character_event = {
	id = christ.5201
	desc = christ.5201.desc
	picture = GFX_event_dog_02
	border = GFX_event_normal_frame_war

	is_triggered_only = yes
	
	only_playable = yes
	only_capable = yes
	only_women = yes
	prisoner = no
	
	trigger = {
		has_character_modifier = pet_hunting_dog
	}
	
	option = {
		name = christ.5201.opta
		character_event = { id = christ.5202 days = 30 }
	}
	option = {
		name = christ.5201.optb
		character_event = { id = christ.5201 days = 30 }
	}
	option = {
		name = christ.5201.optc
		prestige = 5
	}
}

# Woman has sex with dog
character_event = {
	id = christ.5202
	desc = christ.5202.desc
	picture = GFX_event_dog_03
	border = GFX_event_normal_frame_war

	is_triggered_only = yes
	
	only_playable = yes
	only_capable = yes
	only_women = yes
	prisoner = no
	
	trigger = {
		has_character_modifier = pet_hunting_dog
	}
	
	option = {
		name = christ.5202.opta
		add_character_modifier = {
			modifier = dog_lover
			duration = -1
		}
	}
	option = {
		name = christ.5202.optb
		character_event = { id = christ.5202 days = 30 }
	}
	option = {
		name = christ.5201.optc
		prestige = 5
	}
}

# Woman raped by dog
character_event = {
	id = christ.5230
	desc = christ.5230.desc
	picture = GFX_event_dog_badboy_01
	border = GFX_event_normal_frame_war

	is_triggered_only = yes
	
	only_playable = yes
	only_capable = yes
	only_women = yes
	prisoner = no

	trigger = {
		has_character_modifier = pet_hunting_dog
		has_character_flag = bad_dog
	}
	
	option = {
		name = christ.5230.opta
		add_trait = victim
		character_event = { id = christ.5231 days = 30 }
	}
	option = {
		name = christ.5230.optb
		prestige = -100
	}
}

# Woman gets trained to become bitch
character_event = {
	id = christ.5231
	desc = christ.5231.desc
	picture = GFX_event_dog_badboy_02
	border = GFX_event_normal_frame_war

	is_triggered_only = yes
	
	only_playable = yes
	only_capable = yes
	only_women = yes
	prisoner = no

	trigger = {
		has_character_modifier = pet_hunting_dog
	}

	option = {
		name = christ.5231.opta
		character_event = { id = christ.5232 days = 30 }
		if = {
			limit = { NOT = { trait = lustful } }
			add_trait = lustful
		}
		if = {
			limit = { NOT = { trait = hedonist } }
			add_trait = hedonist
		}

		prestige = -20
		hidden_tooltip = { character_event = { id = christ.15 } }
	}
	option = {
		name = christ.5230.optb
		prestige = -10
	}
}

# Woman officialy announces that she's a bitch now
character_event = {
	id = christ.5232
	desc = christ.5232.desc
	picture = GFX_event_dog_badboy_03
	border = GFX_event_normal_frame_war

	is_triggered_only = yes
	
	only_playable = yes
	only_capable = yes
	only_women = yes
	prisoner = no

	trigger = {
		has_character_modifier = pet_hunting_dog
	}
	
	option = {
		name = christ.5232.opta
		add_character_modifier = {
			modifier = bitch
			duration = -1
		}
		give_nickname = nick_bitch
		if = {
			limit = { NOT = { trait = hedonist } }
			add_trait = hedonist
		}
		hidden_tooltip = { set_variable = { which = lust_increase value = 5 } }
		hidden_tooltip = { character_event = { id = christ.15 } }
	}
	option = {
		name = christ.5230.optb
		prestige = -1000
	}
}


character_event = {
	id = christ.8190
	desc = christ.8190.desc
	
	picture = GFX_event_Anna_Henrietta_00
	border = GFX_event_normal_frame_intrigue
	hide_from = yes
	
	min_age = 12
	prisoner = no
	capable_only = yes
	
	trigger = {
		has_character_modifier = pet_hunting_dog
		is_female = no
		is_married = yes
	}
	
	mean_time_to_happen = {
		months = 24
		
		modifier = {
			factor = 0.5
			trait = kind
		}
		modifier = {
			factor = 0.5
			trait = lustful
		}
		modifier = {
			factor = 9999
			trait = chaste
		}
	}
	immediate = {
		random_spouse = {
			limit = {
				is_adult = yes
				prisoner = no
				NOT = { trait = incapable }
			}
			save_event_target_as = dogs_bitch
		}
	}
	option = {
		name = christ.8190.opta # Punisher tames a bitch
		ai_chance = {
			factor = 100
		}
		character_event = { id = christ.8191 }
		hidden_tooltip = { 
			event_target:dogs_bitch = { add_character_modifier = { modifier = bitch  duration = -1 }  give_nickname = nick_bitch  add_trait = wife_of_cuck  add_trait = lustful  add_trait = hedonist  add_trait = victim  set_variable = { which = lust_increase value = 5 } }
		} 
	}
}
character_event = {
	id = christ.8191
	desc = christ.8191.desc
	picture = GFX_event_Anna_Henrietta_01
	is_triggered_only = yes
	option = { 
		name = christ.8191.opta
		character_event = { id = christ.8192 }   
	}
}
character_event = {
	id = christ.8192
	desc = christ.8192.desc
	picture = GFX_event_Anna_Henrietta_02
	is_triggered_only = yes
	option = { 
		name = christ.8192.opta
		character_event = { id = christ.8193 }   
	}
}
character_event = {
	id = christ.8193
	desc = christ.8193.desc
	picture = GFX_event_Anna_Henrietta_03
	is_triggered_only = yes
	option = { 
		name = christ.8193.opta
		character_event = { id = christ.8194 }   
	}
}
character_event = {
	id = christ.8194
	desc = christ.8194.desc
	picture = GFX_event_Anna_Henrietta_04
	is_triggered_only = yes
	option = { 
		name = christ.8194.opta
		character_event = { id = christ.8195 }   
	}
}
character_event = {
	id = christ.8195
	desc = christ.8195.desc
	picture = GFX_event_Anna_Henrietta_05
	is_triggered_only = yes
	option = { 
		name = christ.8195.opta
		character_event = { id = christ.8196 }   
	}
}
character_event = {
	id = christ.8196
	desc = christ.8196.desc
	picture = GFX_event_Anna_Henrietta_06
	is_triggered_only = yes
	option = { 
		name = christ.8196.opta
	}
}
character_event = {
	id = christ.8197
	desc = christ.8197.desc
	picture = GFX_event_zet_10
	is_triggered_only = yes
	option = { 
		name = christ.8197.opta
		character_event = { id = christ.8198 }   
	}
}
character_event = {
	id = christ.8198
	desc = christ.8198.desc
	picture = GFX_event_zet_27
	is_triggered_only = yes
	option = { 
		name = christ.8198.opta
	}
}

# Breasts too big for clothes
character_event = {
    id = christ.5250
    desc = christ.5250.desc
    picture = GFX_evt_lovers
	border = GFX_event_normal_frame_intrigue
	
	is_triggered_only = yes
	
	only_playable = yes
	only_capable = yes
	only_women = yes
	prisoner = no

    trigger = {
        check_variable = { which = breast_size value = 7 }
    }
    
    option = {
        name = christ.5250.opta
        wealth = -5
    }
    
    option = {
        name = christ.5250.optb
        if = {
            limit = { lustful_religion = no }
            piety = -10
        }
        # Chance of levelling up Exhibitionist skill
		hidden_tooltip = { character_event = { id = christ.96 } }
    }

}

# Finds the Holy Dildo
# on_siege_won_leader
# FROM = barony won
character_event = {
    id = christ.8342
    desc = christ.8342.desc
    picture = "GFX_evt_siege"
	border = GFX_event_normal_frame_war
	
	is_triggered_only = yes

	trigger = {
		religion_group = christian
		FROM = { title = b_syrcaesarea }
		OR = {
			any_war = {
				using_cb = crusade
			}
			any_liege = {
				any_war = {
					using_cb = crusade
				}
			}
		}
		NOT = { has_global_flag = found_the_holy_dildo }
	}
	
    immediate = {
		hidden_tooltip = {
			set_global_flag = found_the_holy_dildo
		}
	}

    option = {
        name = christ.8342.opta
        prestige = 200
        if = {
            limit = { has_dlc = Mystics }
            add_artifact = holy_dildo
            new_artifact = {
                set_creation_date = 33.4.1
            }
            hidden_tooltip = { set_variable = { which = lust_increase value = 5 } }
            hidden_tooltip = { character_event = { id = christ.15 } }
        }
    }
}

# By mothers milking themselves into the gap
narrative_event = {
    id = christ.10108
    title = "christ.10108.name"
	desc = "christ.10108.desc"
	picture = GFX_event_orgy_04
	
	is_triggered_only = yes
	
	option = {
		name = "christ.10108.opta"
		random_list = {
			90 = {
				set_character_flag = gate_milk
				narrative_event = {
					id = 10108
					days = 5
					random = 10
					tooltip = "EVTTOOLTIP10108" #It worked!
				}
			}
			10 = {
				narrative_event = {
					id = 10109
					days = 5
					random = 10
					tooltip = "EVTTOOLTIP10109" #It didn't work!
				}
			}
		}
		hidden_tooltip = { set_variable = { which = lust_increase value = 5 } }
		hidden_tooltip = { character_event = { id = christ.15 } }
	}

	option = {
		name = "EVTOPTB10105" #I changed my mind!
		narrative_event = {
			id = 10103
			days = 5
			random = 10
			tooltip = "EVTTOOLTIP10103"
		}
	}
}

# Satanic academic conference
# fired from on_society_bi_yearly_pulse
character_event = {
    id = christ.20000
    hide_window = yes
    
    is_triggered_only = yes
    
    only_playable = yes
	only_capable = yes
	prisoner = no
	is_in_society = yes
	
	trigger = {
		is_devil_worshiper_trigger = yes
		NOT = { is_inaccessible_trigger = yes }
		NOR = {
		    trait = seducer
		    trait = seductress
		    trait = cheap_whore
		    trait = experienced_whore
		    trait = exclusive_whore
		}
		is_ill = no
	}

	weight_multiplier = {
		factor = 1
		modifier = {
			factor = 2.0
			trait = chaste
		}
		modifier = {
			factor = 3.0
			has_focus = focus_scholarship
		}
		modifier = {
			factor = 0.75
			trait = hedonist
		}
		modifier = {
			factor = 0.5
			trait = lustful
		}
		modifier = {
			factor = 0.5
			has_character_flag = had_a_conference
		}
	}

	immediate = {
		# First look for someone at court
		society = {
			random_society_member = {
				limit = {
					ai = yes
					is_incapable = no
					prisoner = no
					NOT = { is_inaccessible_trigger = yes }
                    NOR = {
                        trait = seducer
                        trait = seductress
                        trait = cheap_whore
                        trait = experienced_whore
                        trait = exclusive_whore
                    }
					OR = {
						NOT = { age = 45 }
						is_ill = no
					}
					NOT = { character = ROOT }
					in_command = no
					host = { character = ROOT }
				}
				character_event = { id = christ.20001 }
				break = yes
			}
			
			# Then look for someone in the same realm
			random_society_member = {
				limit = {
					ai = yes
					is_incapable = no
					prisoner = no
					NOT = { is_inaccessible_trigger = yes }
                    NOR = {
                        trait = seducer
                        trait = seductress
                        trait = cheap_whore
                        trait = experienced_whore
                        trait = exclusive_whore
                    }
					OR = {
						NOT = { age = 45 }
						is_ill = no
					}
					NOT = { character = ROOT }
					in_command = no
					same_realm = yes
				}
				character_event = { id = christ.20001 }
				break = yes
			}
			
			# Then look abroad...
			random_society_member = {
				limit = {
					ai = yes
					is_incapable = no
					prisoner = no
					NOT = { is_inaccessible_trigger = yes }
                    NOR = {
                        trait = seducer
                        trait = seductress
                        trait = cheap_whore
                        trait = experienced_whore
                        trait = exclusive_whore
                    }
					OR = {
						NOT = { age = 45 }
						is_ill = no
					}
					NOT = { character = ROOT }
					in_command = no
					is_within_diplo_range = ROOT
				}
				character_event = { id = christ.20001 }
			}
		}
	}
}

# Bounce
character_event = {
	id = christ.20001
	hide_window = yes
	
	is_triggered_only = yes
	
	immediate = {
		FROM = { character_event = { id = christ.20002 } }
	}
}

# Satanic academic conference - Invitation
character_event = {
	id = christ.20002
	picture = GFX_evt_religious_exultation
	border = GFX_event_normal_frame_intrigue
	
	desc = {
		text = christ.20002.desc
		trigger = {
			FROM = {
				NOT = { host = { character = ROOT } }
			}
		}
	}
	desc = {
		text = christ.20002.desc.court
		trigger = {
			FROM = {
				host = { character = ROOT }
			}
		}
	}

	is_triggered_only = yes

	option = {
		name = christ.20002.opta # Of course
		ai_chance = {
			factor = 100
		}
		
		FROM = { character_event = { id = christ.20003 tooltip = christ.20003.tooltip } }
	}
	option = {
		name = christ.20002.optb # No way!
		ai_chance = {
			factor = 1
			modifier = {
				factor = 200
				trait = lustful
			}
			modifier = {
				factor = 50
				trait = craven
			}
		}
		
		detract_society_currency_minor_effect = yes
		reverse_opinion = { who = FROM modifier = opinion_coward years = 5 }
	}
}

# Bounce
character_event = {
	id = christ.20003
	hide_window = yes
	
	is_triggered_only = yes
	
	immediate = {
		save_event_target_as = conference_partner
		FROM = { character_event = { id = christ.20004 days = 3 } }
	}
}

# Satanic conference = Aftermath
character_event = {
    id = christ.20004
    desc = christ.20004.desc
	picture = GFX_evt_bad_news
	border = GFX_event_normal_frame_intrigue
	
	is_triggered_only = yes
	
	immediate = {
	    set_character_flag = had_a_conference
	    
	    random = {
	        chance = 50
	        modifier = {
	            factor = 0
	            has_lover = no
	        }
	        remove_lover = yes
	    }
	    
	    random_list = {
	        100 = { # Become more chaste
	            modifier = {
	                factor = 0
	                trait = chaste
	            }
	            set_character_flag = conference_sex_chastify
	        }
			100 = { # Gain the "Robust" trait
				modifier = {
					factor = 0
					trait = chaste
				}
				set_character_flag = conference_gain_robust
			}
			100 = { # Gain the "Feeble" trait
				modifier = {
					factor = 0
					trait = feeble
				}
				set_character_flag = conference_gain_feeble
			}
			50 = { # Gain the "Cannibal" trait
				modifier = {
					factor = 0
					trait = cannibal_trait
				}
				set_character_flag = conference_cannibal
			}
			100 = { # Gain a demonic blessing
				modifier = {
					factor = 0
					OR = {
						#has_character_modifier = ceryneian_blessing
						has_character_modifier = blessing_of_asmodeus
					}
				}
				set_character_flag = conference_blessing
			}
	    }
	    
		# Random courtier is ritually murdered
		random = {
			chance = 20
			random_courtier = {
				limit = {
					NOR = {
						character = ROOT
						character = FROM
						is_married = ROOT
						is_close_relative = ROOT
					}
					is_adult = yes
					prisoner = no
					is_ruler = no
					NOT = { same_society_as = ROOT }
				}
				ROOT = { set_character_flag = conference_murder }
				save_event_target_as = conference_casualty
				death = { death_reason = death_murder_unknown killer = ROOT }
			}
		}
	}
	
	option = {
		name = {
			text = EVTOPTA_MNM_20004_CANNIBAL
			trigger = {
				has_character_flag = conference_cannibal
			}
		}
		name = {
			text = EVTOPTA_MNM_20004_GOOD # I feel good!
			trigger = {
				NOT = { has_character_flag = conference_cannibal }
				OR = {
					has_character_flag = conference_gain_robust
					has_character_flag = conference_blessing
				}
			}
		}
		name = {
			text = EVTOPTA_MNM_20004_BAD # I feel drained...
			trigger = {
				NOT = { has_character_flag = conference_cannibal }
				has_character_flag = conference_gain_feeble
			}
		}
		name = {
			text = EVTOPTA_MNM_20004
			trigger = {
				NOR = {
					has_character_flag = conference_cannibal
					has_character_flag = conference_gain_robust
					has_character_flag = conference_blessing
					has_character_flag = conference_gain_feeble
				}
			}
		}
		
		# Dark Power gain
		add_society_currency_minor_effect = yes

		if = {
			limit = { has_character_flag = conference_sex_chastify }
			if = {
				limit = { NOT = { trait = lustful } }
				add_trait = chaste
			}
			if = {
				limit = { trait = lustful }
				remove_trait = lustful
			}
		}

		if = {
			limit = { has_character_flag = conference_gain_robust }
			if = {
				limit = { NOT = { trait = feeble } }
				add_trait = robust
			}
			if = {
				limit = { trait = feeble }
				remove_trait = feeble
			}
		}
		
		if = {
			limit = { has_character_flag = conference_gain_feeble }
			if = {
				limit = { NOT = { trait = robust } }
				add_trait = feeble
			}
			if = {
				limit = { trait = robust }
				remove_trait = robust
			}
		}
		
		if = {
			limit = { has_character_flag = conference_cannibal }
			add_trait = cannibal_trait
		}

		if = {
			limit = { has_character_flag = conference_blessing }
			add_character_modifier = {
                modifier = blessing_of_asmodeus
                days = -1
            }
		}
		
		# Friend gained / Rivalry lost
		if = {
			limit = {
				NOR = {
					is_lover = FROM
					is_friend = FROM
					is_rival = FROM
				}
				random = 75
			}
			add_friend = FROM
		}
		if = {
			limit = {
				is_rival = FROM
			}
			remove_rival = FROM
		}
		
		if = {
			limit = {
				has_character_flag = conference_murder
			}
			event_target:orgy_casualty = {
				death = { death_reason = death_murder_unknown killer = ROOT }
				show_portrait = yes
			}
		}

		clr_character_flag = conference_sex_chastify
		clr_character_flag = conference_gain_robust
		clr_character_flag = conference_gain_feeble
		clr_character_flag = conference_cannibal
		clr_character_flag = conference_blessing
		clr_character_flag = conference_murder
	}
}

# Character chosen as Queen of Lust and Beauty
character_event = {
	id = christ.74000
	hide_window = yes
	
	capable_only = yes
	prisoner = no
	
	trigger = {
		capital_scope = {
			NOT = { has_province_modifier = peasants_upset }
		}
		has_character_modifier = holding_summer_fair
		OR = {
			NOT = { has_character_flag = fair_event_happened }
			had_character_flag = {
				flag = fair_event_happened
				days = 3
			}
		}

		had_character_flag = {
			flag = summer_fair_begin
			days = 3
		}		
	}
	
	immediate = {
		set_character_flag = fair_event_happened
		
		capital_scope = {
			random_province_character = {
				limit = {
					is_female = yes
					is_marriage_adult = yes
					NOR = {
						trait = chaste
						trait = celibate
						trait = incapable
						trait = gluttonous
						age = 45
					}
				}
				character_event = { id = christ.74001 }
			}
		}
	}		
	
	mean_time_to_happen = {
		days = 180
		
		modifier = {
			factor = 0.33
			NOT = { has_character_flag = fair_event_happened }
		}	
		
		modifier = {
			factor = 1.5
			has_character_flag = fair_event_happened
		}			

		modifier = {
			factor = 0.5
			trait = lustful
		}
		
		modifier = {
			factor = 0.5
			trait = hedonist
		}
		
		modifier = {
			factor = 2
			trait = chaste
		}
		
		modifier = {
			factor = 2
			trait = celibate
		}
		
		modifier = {
			factor = 0.75
			trait = gregarious
		}
	}
}	

# ping event to get the character randomly chosen in christ.74000 into scope
character_event = {
	id = christ.74001
	desc = christ.74001.desc
	picture = GFX_event_seduction_08
	is_triggered_only = yes
	
	option = {
		name = christ.74001.opta
		add_trait = gangbang_fanatic
		add_character_modifier = {
			name = christ_lust_queen
			duration = -1
		}
		if = {
			limit = {
				is_pregnant = no
				NOT = { age = 45 }
			}
			random = {
				chance = 50
				impregnate = 0
			}
		}
		hidden_tooltip = {
            character_event = { id = christ.15 }
			if = {
				limit = {
					FROM = {
						NOT = {
							character = ROOT
						}
					}
				}
				FROM = { character_event = { id = christ.74002 } }
			}
		}
	}
}

# Character reacts to queen of lust and beauty
character_event = {
	id = christ.74002
	desc = christ.74002.desc
	picture = GFX_event_seduction_08
	is_triggered_only = yes

	# Watch
	option = {
		name = christ.74002.opta
		add_trait = cuck
	}
	
	# Female character helping
	option = {
		name = christ.74002.optb
		trigger = {
			is_female = yes
			is_marriage_adult = yes
			OR = {
				trait = lustful
				trait = hedonist
			}
		}
		if = {
            limit = {
                is_pregnant = no
                NOT = { age = 45 }
            }
			random = {
				chance = 5
				impregnate = 0
			}
		}
		capital_scope = {
			add_province_modifier = {
				name = christ_peasant_sex
				duration = -1
			}
		}
	}
	
	# Male character leading
	option = {
		name = christ.74002.optc
		trigger = {
			is_female = no
			is_marriage_adult = yes
		}
		# Note that, despite the text of this option, the check to see if the
		# Queen of Lust is impregnated by the male character actually happens
		# _after_ the check to see if she's impregnated by a random peasant.
		FROM = {
			hidden_tooltip = {
				character_event = { id = WoL.97 }
			}
		}
	}
}